Forms and queries

[MalvinkaAccess]

I have a couple of questions:
1. If a user enters a loan number into a form, how do I see if the loan number is already in the database and ask the user whether they would like to update the entry, and if yes, then update the existing entry rather than added a new one. How do I do that?

2. How do I get the previous date before 3pm in the query? (the actual dates in the database would be 1/12/13 15:00 for instance)

Thanks so much for your help!

[June7]

1. use a combobox and code in combobox BeforeUpdate to search the table, VBA code using DLookup like:

If Not IsNull(DLookup("loanNum", "tablename", "LoanNum=" & Me.comboboxname)) Then
If MsgBox("Loan exists. Do you want to edit.", vbYesNo) = vbYes Then
'code to go to existing record or open another form
Cancel = True
EndIf
EndIf

2. you want latest date prior to 3pm for all records in table or just for the loan number?

[MalvinkaAccess]

1. use a combobox and code in combobox BeforeUpdate to search the table, VBA code using DLookup like:

If Not IsNull(DLookup("loanNum", "tablename", "LoanNum=" & Me.comboboxname)) Then
If MsgBox("Loan exists. Do you want to edit.", vbYesNo) = vbYes Then
'code to go to existing record or open another form
Cancel = True
EndIf
EndIf

This isn't working at all Giving me an error about Loan Number (that's the name of it in the table)

2. you want latest date prior to 3pm for all records in table or just for the loan number?

Latest date prior to 3pm for all records in the table

Thanks so much!

[June7]

Try:

DMax("datefield","tablename","Hour(datefield)<15")

[MalvinkaAccess]

Try:

DMax("datefield","tablename","Hour(datefield)<15")

Thanks so much!