runtime error 2147352567 (80020009) could not update, currently lo

J

John Barnes

Have a form which runs following code:
Private Sub ShiftStart_DblClick(Cancel As Integer)
Dim varDate As Variant
ShiftStart = DateAdd("m", -1, Now())

varDate = PickDateTime(Me.ShiftStart)

If varDate & "" <> Me.ShiftStart & "" Then
Me.ShiftStart = varDate
End If

'Setting this to true will cancel the regular dbl-click event
'so a block of text is not hilited
Cancel = True
End Sub




On one machine (Win XP Pro SP3, Access 2003 SP3) calendar opens fine. On
another machine, same setup, receive the following error when double clicking
on ShiftStart to open a new record:

Run-time error '-2147352567 (80020009)'; Could not update; currently locked.

Offers option to end or debug.

Record Locks is set to No Locks.

Any idea what is causing this error? Thank you very much.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Run-time error 2147352567 (80020009) 0
Error 2147352567 2
HELP: Run-time error '-2147352567 (80020009): 3
Combo error 1
Run time error with Find Box and automatic DOLE 0
Runtime Error 4
could not update;currenty locked 1
Error -2147352567: Locked. Cannot update 0

Top