To update all records at once then remove the where condition. It will still update 1 record at a time however as that's just how access works.
The where condition is limiting the "who". So any where condition will filter your table and reduce your quantity of records effected.
The Test:
Confirm that DAO's LastModified function does indeed return YOUR Last Modified record.
Method:
Using 2 Access Front Ends running the same routine and connecting to a single Access Back End table.
Attempt to read back an inserted GUID value that is not the inserted GUID value.
Loop...
Sometimes a need to log the Forms flow is required and if the form is heavy with form events or Form Controls then it could be a good time to use a WithEvents
Class to capture the Form/User experience.
I have attached a simple database with some basic WithEvents Hooks for you to use as you...
I needed this functionality anyway so I wrote it up just now. It works, you may need to go into your gmail settings and allow the app but i left a note how to do that at the bottom of the SendEmail Function
Paste this into any Module
Public Sub CatchError()
Dim MailOrLog As New Gmail...
ok cool cool, you can do this many ways. some of the better ways include...
-A table that holds only A1....A16 in a single column then bind your drop down to this table on your User Assignment Form.
-Or you could add a value list to your combo with A1;A2;A3;A4;A5;A6.......;A16 as the values...
build a web function in azure that receives a post from access. set up a free send grid account and use their api to send an email to you. you get like 100 free emails per day through sendgrid. then you wont need outlook at all. done this many times. also what about a cloud SQL table that stores...
why not just use a table to store each category against the id. Whats the point of this really?
--ahh, should probably have read the above comments first. sorry guys
I can't speak to the actual issue but this should get you past the error.
Paste this into your forms code
Private Sub Form_Error(DataErr As Integer, Response As Integer)
Response = acDataErrContinue
end sub
I would try something like this
Private Sub form_afterupdate()
Dim ctl As Control
Dim frm As Form
For Each ctl In Forms!frmOrder.Form.Controls
On Error GoTo NextControl
If ctl.ControlType = acSubform Then
Set frm = ctl.Form
Debug.Print frm.Name...
Have you tried using the wayback machine?
You can use it to look back in time at almost any website and find lost content.
here I have a link for you.
https://web.archive.org/web/20040801000000*/http://datapigtechnologies.com
good luck
P.S.
september 3rd 2004 seems to have access video content