ZeidHaddad
Registered User.
- Local time
- Today, 03:19
- Joined
- Oct 29, 2019
- Messages
- 44
Hello everyone, hope everything is good!
I have this code
Private Sub Vertragsnummer_AfterUpdate()
Dim NewVertragsnummer As String
Dim stlinkcriteria As String
NewVertragsnummer = Me.Vertragsnummer.Value
stlinkcriteria = "[NewVertragsnummer] = " & "'" & NewVertragsnummer & "'"
If Me.Vertragsnummer = DLookup("[Vertragsnummer]", "Tbl_Dokumentation", stlinkcriteria) Then
MsgBox "The Contract Number," & NewVertragsnummer & ", Already exists!!" _
& vbCr & vbCr & "Please Check The Contract Number Again.", vbInformation, "duplicate information"
Me.Undo
End If
End Sub
I’m trying to avoid duplication inside my database but it keeps telling me that “tbl_dokumentation” does not exist! Although i have it.
Also for my form the data source is also the table documentation.
I have this code
Private Sub Vertragsnummer_AfterUpdate()
Dim NewVertragsnummer As String
Dim stlinkcriteria As String
NewVertragsnummer = Me.Vertragsnummer.Value
stlinkcriteria = "[NewVertragsnummer] = " & "'" & NewVertragsnummer & "'"
If Me.Vertragsnummer = DLookup("[Vertragsnummer]", "Tbl_Dokumentation", stlinkcriteria) Then
MsgBox "The Contract Number," & NewVertragsnummer & ", Already exists!!" _
& vbCr & vbCr & "Please Check The Contract Number Again.", vbInformation, "duplicate information"
Me.Undo
End If
End Sub
I’m trying to avoid duplication inside my database but it keeps telling me that “tbl_dokumentation” does not exist! Although i have it.
Also for my form the data source is also the table documentation.