This is driving me NUTS. I HATE ADO!! Can somebody please tell me why I keep getting an error saying "Insufficient base bloody information for updating and friggin' refreshing this hell hole recordset"
Dim adoUserLog As Recordset
Dim db As Connection
Set db = New Connection
With db
.CursorLocation = adUseClient
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & CurrentDir & "Data\Driving.mdb;Jet OLEDBatabase Password=MyPassword;"
.Open
End With
Set adoUserLog = New Recordset
adoUserLog.Open "SELECT * FROM [User Log];", db, adOpenStatic, adLockOptimistic
With adoUserLog
.AddNew
.Fields("UserID").Value = CurrentUserID
.Fields("Description").Value = Activity
.Fields("LogDate").Value = Format(Date, "dd/MM/yyyy")
.Fields("LogTime").Value = Format(Time, "hh:nn:ss")
.Update
End With
I'm at a complete loss, I see nothing wrong and I'm on the verge of pumping this computer full o'lead
Please HELP and keep me sane!
A thousand thank you's
Many regards,
------------------
- Chris
[email protected]
If it ain't broke - don't fix it
[This message has been edited by chrisjk (edited 02-06-2000).]




atabase Password=MyPassword;"
Reply With Quote