Boa Noite pessoal!
Preciso da vossa ajuda.
O seguinte código faz com que após inserir dados no campo "NUM_PROAVE" verifique se o número existe na tabela "PROAVE" e se não existe adiciona um novo n.º
Funciona direitinho. Mas reparei agora que se escrever algo no campo e depois apagar, o access devolve este erro "Run Time Error '3075' . Erro de Sintaxe (operador em falta) 'Num_Proave=' "
Alguém me pode ajudar a ultrapasar?
Obrigado.
Preciso da vossa ajuda.
O seguinte código faz com que após inserir dados no campo "NUM_PROAVE" verifique se o número existe na tabela "PROAVE" e se não existe adiciona um novo n.º
- Código:
Private Sub NUM_PROAVE_AfterUpdate()
If Not IsNull(NUM_PROAVE) And IsNull(DLookup("Num_Proave", "Proaves", "Num_Proave=" & Me!NUM_PROAVE)) Then
MsgBox "Não existe Proave com este n.º, vai ser inserido um novo"
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO Proaves VALUES (NUM_PROAVE, Null, Null, Null)"
DoCmd.SetWarnings True
End If
End Sub
Funciona direitinho. Mas reparei agora que se escrever algo no campo e depois apagar, o access devolve este erro "Run Time Error '3075' . Erro de Sintaxe (operador em falta) 'Num_Proave=' "
Alguém me pode ajudar a ultrapasar?
Obrigado.