Microsoft
Software
Hardware
Network
Question : Checking for duplicate record AfterLostFocus
I have a Jobs table (tblJobs) that has 3 fields I need to manipulate. On data entry of a new job (I have a command button to "Add" a new job) I need the following to happen as the user enters the data:
1. Enter Job Number (JobNumber)...Sample: 0035 (text)
2. Enter the Year (JobYear)...Sample: 2010 (text)
3. When losing focus on the Year, I want to combine the two fields into one (JobNumberExt)...Sample 00352010 (text)
4. I want the code to check tblJobs to see if that JobNumber already exists.
5. If so, display a warning msg and set focus to the JobNumber field for modification..
6. If not, set focus to next field (JobName)
Reasoning to help clarify situation...every year the JobNumber starts at 0001. Therefore I have to enter the JobYear and combine the two fields to eliminate duplicate jobs.
Answer : Checking for duplicate record AfterLostFocus
private sub jobYear_lostfocus()
if dcount("*","tbljobs","jobn
umber='" & me.jobNumber &"' and jobyear='" & me.jobYear & "'")>0 then
msgbox "record already exists"
me.jobnumber.setfocus
end if
end sub
Random Solutions
High Concurrent User Count - Best Practices?
Replacing OCX Controls used in Microsoft Access 2007
How to read field names from an XSD file.
Can not import emails from Outlook Express to Outlook in Windows Vista
Is there any Chinese writing PAD driver source code for windows and mac?
Can't change working time in project 2007
Opening a report in Access - It asks a question - The answer I type is added as text in the report
NAME? in fields on crosstab query subform
server 2008 security
How can I enable a template item accoding to query result ?