ESTOQUE

NEREU1301 03/05/2010 16:43:48
#340829
Boa Tarde

Está é parte de uma sub em que lanço produtos numa flex e ela vai dando baixa no estoque.

Estou tentando usar o método find mas está retornando erro [Ô]Os argumentos são incorretos, estão fiora do inervalo aceitável ou estão em conflito.[Ô] e sinaliza na linha sublinhada.

Case 3
rsProdutos.MoveFirst
[txt-color=#e80000] rsProdutos.Find [Ô]Referencia = Grid.TextMatrix(Grid.Row, 1)[Ô] [/txt-color]
If rsProdutos.EOF = True Then
MsgBox [Ô]Produto não encontrado encontrado[Ô]
Else
vMaior = Text1.Text
If vMaior > rsProdutos!estoque Then
MsgBox [Ô]A quantidade de saida é maior que a do estoque[Ô], vbCritical, [Ô]ATENÇÃO[Ô]
Else
rsProdutos!estoque = rsProdutos!estoque - Text1.Text
rsProdutos.Update
MsgBox [Ô]Estoque Atualizado![Ô]
End If
End If

Excluindo essa linha ele dá baixa no estoque, mas lógico, sempre do primeiro item. que é claro não tá certo.

Tentei o método Seek que tambem não funcionou, então conto com os amigos prá alguma idéia.

Nereu
MICROSCHEME 03/05/2010 17:00:08
#340831 Resposta escolhida
rsProdutos.Find [Ô]Referencia = [Ô] & Grid.TextMatrix(Grid.Row, 1)
NEREU1301 03/05/2010 17:24:36
#340832
Obrigado!

Tá resolvido.

nada como falar com quem entende.

Abraço

Nereu
Tópico encerrado , respostas não são mais permitidas
Voltar