Questione : Controllando per vedere se c'è una combinazione duplicata prima del salvataggio del nuovo record

Ho una forma di entrata per una tabella - viaggi entranti.  Voglio pubblicare un avvertimento se la combinazione di identificazione del passeggero e la data già exists.

I di viaggio che esamina un certo codice della disposizione: il
If DCount del

Private Date_AfterUpdate () (“*„, “tblJourneys„,„ [identificazione del passeggero] = identificazione di Me.Passenger e [data] = Me.Date ") > 0
but del
End If
di Then
MsgBox (“duplicato„) questo rivela sempre un errore di sintassi.  Ho provato le varie combinazioni di sintassi ma senza success.

I sure questo è relativamente diretto - la speranza qualcuno può fornire un certo codice semplice per this.

Regards

Richard
End Sub class= del

Risposta : Controllando per vedere se c'è una combinazione duplicata prima del salvataggio del nuovo record

aprire il frmNewJourney della forma nella vista di disegno
cambiare il nome della casella combinata per il passeggero da Field41 a cboPassengerID

usare questo codici

Time_Enter secondario riservato ()
Se DCount (“*„, “tblJourneys„,„ [identificazione del passeggero] = “& Me.cboPassengerID &„ e [data] = # " & Me.DTPicker6 & “#") > 0 allora
    MsgBox (“duplicato„)
   
Concluder se

Concludere il sommergibile