Record Lock Problem - 2nd try

  • Thread starter Thread starter Paul S
  • Start date Start date
P

Paul S

I am using the following code in a loop to update 2 fields
in a table.

With rstSYSTRAN
.Edit
!Shift = rstShifts![ShiftID]
!ShiftDate = DateAdd("d", rstShifts!TimeShift,
rstSYSTRAN!SYSDAT)
.Update
End With

Works like a charm, except I get a message about exceeding
record lock limit (something like that)

I can get rid of this message if i go into
Tools>Options>Advanced and unclick 'Open Databases Using
Record-Level Locking'. But since this database is on a
network - I seem to have to do this on every workstation.

What steps am I missing to avoid this error message.

Thx
 
Can you do the same using an UPDATE query? It's almost always more efficient
to use SQL than VBA to update values.
 
Back
Top