Notifications
Clear all

Update em Access - Erro


Wenceslau
Posts: 4
Registered
Topic starter
(@wenceslau)
New Member
Entrou: 10 meses atrás

Senhores, bom dia,

 

Estou com um problema, consigo cadastrar dados apartir de um userform em um banco access 2016 sem problemas

Mas no update, tenho problemas, diz q o banco está em modo leitura.
Vejam minha conexão e imagens para facilitar o entendimento.

 

Global banco As Database
Global consulta As DAO.Recordset

Sub ConectaBanco()

       Windows(ThisWorkbook.Name).Activate
       Set banco = OpenDatabase(ActiveWorkbook.Path & "\Data\Cliente.accdb", False, False) 

End Sub

 

NA HORA DE FAZER UPDATE

 

ComandoSQL = "Select * from tb_Clientes....."

Set consulta = banco.OpenRecordset(ComandoSQL)

With consulta

.Edit
.Fields("Cliente_DataCadastro") = txt_Data

.update

end with

 

Alguém pode me dar uma dica de onde está o problema?

 

Imagens em Anexo.

Responder
2 Respostas
Anderson
Posts: 180
Registered
(@anderson)
Estimable Member
Entrou: 2 anos atrás

Fiz um vídeo com vários exemplos que funcionam.

No vídeo é usado Update no SQL, em vez de usar o Select.

Se te interessar fazer o Update no SQL, assista a este vídeo:

 

https://youtu.be/2UDzjqMSiPk

Responder
1 Responder
Wenceslau
Registered
(@wenceslau)
Entrou: 10 meses atrás

New Member
Posts: 4

@anderson Obrigadissimo pela sua ajuda e disposição.
Mas encontrei outra dificuldade, vc tem um contato q eu poderia falar com vc, como whats ou email?

Abraços.

Responder