Ah. I thought we'd discussed references earlier but it seems not.
You should have the following 5 items
The first 4 are standard but you need to add the last one yourself.
The path should be similar to what I've shown
NOTE: If using Access 2016, all the 14.0 values will be 16.0
I dug every corner of you database but I'm still getting an error, I'm even still working on it right now but those error codes seems to be so keen to show up .
Function IsRelative(fname As String) As Boolean
' Return false if the file name contains a drive or UNC path
IsRelative = (InStr(1, fname, ":") = 0) And (InStr(1, fname, "\\") = 0)
End Function
Did you COPY ALL the code from my example app or just bits of it?
Perhaps reimport all the code?
You did miss a couple of important things
Most importantly you changed the autonumber field name from ContactID to ID but didn't update the related code.
Its now working
Changes made to cmdAddPhoto_Click code:
1. Added code to save new record before adding photo (If Me.Dirty Then ....)
2. Changed both SQL statements to use your ID field (my code had ContactID)
3. Removed Me.Requery at end - this isn't needed on your form and it returned code to first record
Also I strongly recommend that you do NOT
1. store Age as a field as it will continually go out of date
If you want you can use a function to calculate age based on DOB
You can find lots of examples online or in this forum
2. use spaces in database names or folders
Also DO
3. compact your database before uploading - note how much smaller it is now!
4. add code to disable the photo button until person details have been entered
@isladog Sorry if it's took a while for me respond, I got busy yesterday on one our site and just got home right now. By the way I'm creating a simple query filter using a form and a combo box but the problem is when every time I put a criteria on one of the fields then the records get missed up. I even tried to change the jointype.