[Resolvido]Instrução UPDATE - inserir dados em tabelas

Prezados, boa tarde!

Desculpe se estou fazendo uma pergunta besta, mas nunca tinha usado a instrução UPDATE e estou me batendo um pouco.

Tenho um formulario onde o usuario pode atualizar o registro ou nao, estou criando um evento para que caso ele altere o valor do campo esse valor seja atualizado na tabela.

Ja tentei fazer o UPDATE de varias maneiras e continua apresentando o erro "RUN TIME ERRO - 3061 | TOO FEW PARAMETERS. EXPECTED 1. Entendo que esse erro indica falta de paramentros mas nao sei qual. Segue o código:


Private Sub APLICACAO_MULTA_AfterUpdate()


   Dim StrSQL As String
   Dim DB As Database
   Dim RS As Recordset

   StrSQL = "UPDATE tbl_rdo_multa Set APLICACAO_MULTA ='" & Me.APLICACAO_MULTA & "' WHERE Valida=" & Me.Valida & ";"


   Set DB = CurrentDb
   DB.Execute (StrSQL)



End Sub

Se alguem tiver uma ideia do que pode estar acontecendo.


Obrigada!

Ola Kamylla,

Seja bem-vinda ao fórum!!!
Por gentileza, poste aqui seu banco de dados (tem que ser no formato .ZIP) para análise e solução.

Veja aqui como postar: https://www.maximoaccess.com/t32003-como-postar-anexos-e-imagens-no-site-maximoaccess-com

GRato

Att,

Olá Alexandre.

Segue print das tabelas e do código:


a string que uso para validar é muito grande, tranquilamente mais de 50 caracteres. Como é um processo bem especifico nao achei outro jeito de ter uma primary key. Nesse print estou tentando validar com a string tt apenas para teste pois fica mais facil de ler.

Essa é a tabela que estou tentando inserir o dado:


esse é o formulario que deve ser preenchido:



Obrigada!

Olá Avelino!

Segue msg:





Obrigada!

Muito Obrigada Avelino!
Deu certo!