Rotina com Erro

USUÁRIO: SENHA:

SALVAR LOGIN ?


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Rotina com Erro

Antares

UCHOA
SP - BRASIL

ENUNCIADA !

Postada em 18/07/2004 17:46 hs

Ainda estou com problemas nessa rotina... criei uma tabela estorno no addins... to usando o vb 5... e quero q todas as vezes q der saida errada no formulário saida, ao clicar no botão estrono ele executa atravez de um label nota cancelada e envia aqueles dados pra o formulário estorno, só q naum vai... q ódio, o q tá faltando?

Private Sub Cmdestorno_Click()
Dataestorno.AddNew
Dataestorno.Recordset.Edit
Dataestorno.Recordset!Codigo = Val(Txtcodigo.Text)
Dataestorno.Recordset.Refresh
Dataestorno.Recordset.Update
Dataprodutos.Recordset.Edit
Dataprodutos.Recordset!Quantidade = Dataprodutos.Recordset!Quantidade + Val(Txtquantidade)
Dataprodutos.Recordset.Update

End Sub

Agradeço a ajuda... se puderem

|-tom-|

CATANDUVA
SP - BRASIL

Postada em 19/07/2004 08:29 hs

tenta fazer o seguinte meu amigo, esses campos q estao em negrito eles nao sao necessarios da forma como vc esta colocando, tente executar o projeto sem eles, se nao der certo entao vc me avise para q eu possa ajuda-lo

Private Sub Cmdestorno_Click()
Dataestorno.AddNew
Dataestorno.Recordset.Edit
Dataestorno.Recordset!Codigo = Val(Txtcodigo.Text)
Dataestorno.Recordset.Refresh
Dataestorno.Recordset.Update
Dataprodutos.Recordset.Edit
Dataprodutos.Recordset!Quantidade = Dataprodutos.Recordset!Quantidade + Val(Txtquantidade)
Dataprodutos.Recordset.Update

End Sub

-------------------------------------------------------------------------------------------------------------------------------------------------------------------------

tom -Catanduva/SP

Analista Sistemas - Visual Basic 6 - VB.NET

"Confiai perpetuamente no Senhor, porque o Senhor Deus é uma Rocha Eterna"

Isaías 26:4

Página(s): 1/1


		CyberWEB Network Ltda. © Copyright 2000-2024 - Todos os direitos reservados. Powered by HostingZone - A melhor hospedagem para seu site