Notifications
Clear all

Update em Access - Erro  


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

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.


ResponderCitar (Quote)
Anderson
(@anderson)
Estimable Member Registered
Entrou: 10 meses atrás
Posts: 159
 

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

Este post foi modificado 1 mês atrás 6 vezes por Anderson

Em 90% dos casos em que não se anexa o arquivo, ocorrem mal-entendidos, gerando perda de tempo de ambos os lados.


ResponderCitar (Quote)
Wenceslau
(@wenceslau)
New Member Registered
Entrou: 2 meses atrás
Posts: 3
Topic starter  

@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.


ResponderCitar (Quote)