Do you use a startup form? If so, code in the Open event will allow you to
capture this information:
Add a table to your database, name it tblLog and add 3 fields: lngID
(Autonumber), strUser (Text), and dteDate (DateTime)
In the Open event of your startupform, add this code:
Currentdb.Execute "INSERT INTO tblLob(strUser, dteDate) VALUES('" &
CurrentUser & "',#" & Now() & "#)"
Note that if you are not using Access security, you'll have to use alternate
methods to determine the user. here's one example:
http://www.mvps.org/access/api/api0008.htm
If you use this function, the code above would change like this:
Currentdb.Execute "INSERT INTO tblLob(strUser, dteDate) VALUES('" & fsOSName
& "',#" & Now() & "#)"
--
Scott McDaniel
CS Computer Software
Visual Basic - Access - Sql Server - ASP
"Smash forehead on keyboard to continue ... "