[AccessD] Puzzled.... Error 3188

Max Wanadoo max.wanadoo at gmail.com
Tue Jun 9 22:21:29 CDT 2009


Hi Robert,
I am assuming from what you have written that frmServicesNavigator is also
the form that you are calling this from. IOW you are calling the same from
from within the OnCurrent of the same form...

Just remove the with Form/End With bit.
And in the OnCurrent event, replace with with....

Me!txtComment = Nz(Me.Quick_History, "") <<<<< THIS LINE


Me!txtDirections = Nz(Me!Directions, "")
Me!txComplaints = Nz(Me!CustomerComplaints, "")
Me!.txSysNotes = Nz(Me!SysNotes, "")

You were also referring to controls using the DOT as if they were properties
or methods, you should use the EXCLAM ! to refer to controls.


NOW -If frmServicesNavigator is actually a reference to another form
entirely, then I think you would be better referencing with with

Dim frm as form
Set frm - [Forms]![frmServicesNavigator]
With frm
!ctrlname
!ctrlname2 
End with

HTH

Max



-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert
Sent: 10 June 2009 01:40
To: 'Access Developers discussion and problem solving'
Subject: [AccessD] Puzzled.... Error 3188

I have a form/subform that lists open Service Orders. The user picks the
service order they want to work with, open another form to perform various
tasks. Everything has been working fine for years..

Recently I added some "features", that in part, involved this line of code
that fires on the subforms Current event to simply update a unbound text box
on the main form (which is also unbound).

With Form_frmServicesNavigator

... 
...
...
...
...


.txtComment = Nz(Me.Quick_History, "") <<<<< THIS LINE


.txtDirections = Nz(Me!Directions, "")
.txtComplaints = Nz(Me!CustomerComplaints, "")
.txtSysNotes = Nz(Me!SysNotes, "")

End with


Now on occasion the user gets this error when attempting to update this
field (memo field) via a DAO.recordset.

"Error 3188 - Could not update; currently locked by another session on this
machine..." 

If I comment this line of code out, all works fine and the error does not
show up again. I have tried all manor of variations to reference the main
form thinking that may be causing it, but I get the same intermittent
results.

Any idea's??

WBR
Robert
 


-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com




More information about the AccessD mailing list