Kod:
If DCount("[Event ID]", "tables![Confirmation]", "='Me![EventID]'") = 0 Then
DoCmd.OpenForm "Multi-Confirmation", acNormal, , , acFormAdd
Forms![Multi-Confirmation]![Event ID] = Me![EventID]
Else
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Multi-Confirmation"
stLinkCriteria = "[Event ID]=" & Me![EventID]
DoCmd.OpenForm stDocName, , , stLinkCriteria
End If
End Sub
ELSE durumunda kayıda gidiyor .
Ama tam yapamamış uğraşan kişide o yüzden örnek alamadım .
dcount üzerine araştırıyoum çözümü bulursam yazarım