[Resolvido]Tratamento de erro - Verificar se registro foi gravado com sucesso em uma outra tabela

Bom dia Pessoal!

Estou necessitando após a impressão de determinado número de carnês (uso uma tabela temporária), gravar os registros desta tabela em uma outra tabela que é o histórico de carnês impressos.
Até aqui tudo bem, funciona corretamente.
Preciso, verificar, com base no campo ID, Data_Processamento, Nosso_Numero se, efetivamente foram inseridos estes valores na tabela tabela do histórico de carnês impressos.

Estive procurando e vi que pode, talvez, ser feito com DCount, como neste exemplo do Avelino Sampaio:

If DCount("idCliente","tblClientes","cli_Nome =""" & Me!cli_Nome & """") > 0 Then
  'A função DCount() contou um ou mais registros existentes
  MsgBox "O Cliente " & Me!cli_Nome & " já existe..."
  Me.Undo
  Cancel = True
End If


Como posso implementar este, ou uma outra função, que sejam compare a tabela temporária e a de histórico?

Obrigado.
Wagner Bonelli

Olá bom dia !

tente fazer um "Dlookup"

seria desta forma aqui:

Código:


Dim campoexiste

campoexiste = Nz(dlookup("seuID","suaTabela","seuID=seuIDnoforme"),0)

if campoexiste = 0 then

'ele não contém na sua tabela

else

'ele contém na sua tabela

end if



se não ajudou disponibilize parte do projeto que ajudarei melhor!

Abraços

OI Danilo, bom dia!

Ajudou muito!
Obrigado.
Mais tarde vou postar aqui como ficou. Talvez ajude mais alguém.
Wagner