USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Atualização de dados
appaulas
CONTAGEM
MG - BRASIL
Postada em 18/05/2004 08:53 hs            
Pessoal,
Estou com problemas para atualizar o banco de dados em access utilizando instruções SQL, abaixo está um exemplo do que estou tentando fazer, a mensagem de erro diz que a instrução SQL contém erro, alguém pode me dizer o que estou fazendo de errado?
Obrigada
Ana Paula

Private Sub SalvarPag()
Dim sSQL As String
Dim auxPgto As Date

auxPgto = Format(TxtDataPag, "mm/dd/yyyy") & Format(TxtHoraPag, " hh:mm:ss")
sSQL = "UPDATE TblChassis"
sSQL = sSQL & "SET PgtoNFData =" & auxPgto
sSQL = sSQL & "WHERE NumNF =" & TxtNFPag
db.Execute (sSQL)

End Sub
     
Vaughyman
RIO DE JANEIRO
RJ - BRASIL
Postada em 18/05/2004 13:20 hs            
Private Sub SalvarPag()
Dim sSQL As String
Dim auxPgto As Date

auxPgto = Format(TxtDataPag, "mm/dd/yyyy") & Format(TxtHoraPag, " hh:mm:ss")
sSQL = "UPDATE TblChassis "  <--- Espaço aqui após tblchassis
sSQL = sSQL & "SET PgtoNFData = " & auxPgto <--Espaço aqui após =
sSQL = sSQL & "WHERE NumNF = '" & TxtNFPag & "' "   - Suponho que esteja usando string no NumNF
db.Execute (sSQL)

End Sub
Uma dica:
Se vc esta trabalhando com Access, cole sua sql  em uma consulta access pois se estiver com algum erro será mais fácil descobrir onde está por causa do ambiente visual. Depois é só colar de volta no seu código e entender o porque do erro.
 

"IF FUNCIONOU = TRUE THEN Emoções

     BLOQUEIE O POST

ELSE Emoções

    POST NOVAMENTE INFORMANDO O QUE ACONTECEU

ENDIF Emoções

     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página