ALTERAR DADOS EM ADODC
Oi pesoal
Estou tendo problemas em ALTERAR os dados já digitados em meu banco de dados, se alguém tiver alguma sugestão ficarei grato.
Este é a parte do programa que atualiza os dados para mim
RS.Open "Select * from VbSenha", StrConexao, adOpenStatic, adLockOptimistic
Usuario = RS.Fields("USUARIO_SEN")
If Usuario = NewUsua Then
RS.Fields("SENHAS1_SEN") = TxtNova
RS.Fields("DTUSUAR_SEN") = Date
RS.Fields.Update
Unload Senha3
Senha1.Show
End If
o que está faltando nesta caso.
Obrigado
[S59]
Estou tendo problemas em ALTERAR os dados já digitados em meu banco de dados, se alguém tiver alguma sugestão ficarei grato.
Este é a parte do programa que atualiza os dados para mim
RS.Open "Select * from VbSenha", StrConexao, adOpenStatic, adLockOptimistic
Usuario = RS.Fields("USUARIO_SEN")
If Usuario = NewUsua Then
RS.Fields("SENHAS1_SEN") = TxtNova
RS.Fields("DTUSUAR_SEN") = Date
RS.Fields.Update
Unload Senha3
Senha1.Show
End If
o que está faltando nesta caso.
Obrigado
[S59]
Você colocou a atualização dentro de uma condição, tenta remover a condição e faz um teste
RS.Fields("SENHAS1_SEN") = TxtNova
RS.Fields("DTUSUAR_SEN") = Date
RS.Fields.Update
Unload Senha3
Senha1.Show
Caso queira manter a condição, verifica se ela é verdadeira
RS.Fields("SENHAS1_SEN") = TxtNova
RS.Fields("DTUSUAR_SEN") = Date
RS.Fields.Update
Unload Senha3
Senha1.Show
Caso queira manter a condição, verifica se ela é verdadeira
Tópico encerrado , respostas não são mais permitidas