[AccessD] [dba-OT] You canceled the previous operation

Sounds like a lot of work.  And I'm wondering if the theory is right.  You
won't believe this kluge of a temporary workaround:

Private Sub cboFindPatient_AfterUpdate()
On Error GoTo Bogus:

    If Not IsNull(Me.cboFindPatient) Then
        Me.RecordsetClone.FindFirst "fldPatientID = " &
Me.cboFindPatient.Column(0)
        Me.Bookmark = Me.RecordsetClone.Bookmark
        'Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateBreakfast
        'Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateLunch
        'Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateDinner
        'Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateBedtime
        Me.cmdMainMenu.SetFocus
        Me.cboFindPatient.Visible = False
    End If
Exit Sub

Bogus:
        Me.Bookmark = Me.RecordsetClone.Bookmark
        Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateBreakfast
        Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateLunch
        Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateDinner
        Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateBedtime
        Me.cmdMainMenu.SetFocus
        Me.cboFindPatient.Visible = False

End Sub

So it actually error on the first Me.Bookmark = goes to the Bogus:  error
routine, and carries on successfully.  

WTF?




Rocky Smolin
Beach Access Software
858-259-4334
www.e-z-mrp.com
www.bchacc.com
 
 

-----Original Message-----
From: dba-ot-bounces at databaseadvisors.com
[mailto:dba-ot-bounces at databaseadvisors.com] On Behalf Of Stephen Pickering
Sent: Thursday, October 23, 2008 1:16 PM
To: Off Topic
Subject: Re: [dba-OT] You canceled the previous operation

I hate to suggest such a thing, but have you tried importing all of your
objects, except the code, into a new mdb, then copying the code from the
modules in your existing mdb and pasting into new modules?
It's cumbersome, but I wonder if something hasn't gone corrupt on you
somewhere, and I'm assuming you've already done the Repair and Compact.

I suggest the copying and pasting of your code instead of just importing the
modules so you don't import the corruption with the code.

One other suggestion, before you try that; did you do a Decompile and
Recompile?

On Thu, Oct 23, 2008 at 2:35 PM, Rocky Smolin at Beach Access Software
<rockysmolin at bchacc.com> wrote:
> Dear List:
>
> I am getting the err 'You canceled the previous operation in a simple 
> module that works in lots of other apps.  The error occurs in the line 
> Me.Bookmark = Me.RecordsetClone.Bookmark.
>
> Oddly if I click Debug and then, in the code window, click F5 to 
> continue, it goes right ahead and when I go back to the form it's 
> displaying the right record.
>
> Any ideas?
>
> Private Sub cboFindPatient_AfterUpdate()
>
>    If Not IsNull(Me.cboFindPatient) Then
>        Me.RecordsetClone.FindFirst "fldPatientID = " &
> Me.cboFindPatient.Column(0)
>        Me.Bookmark = Me.RecordsetClone.Bookmark
>        Me.cmdMainMenu.SetFocus
>        Me.cboFindPatient.Visible = False
>    End If
>
> End Sub
>
> MTIA,
>
>


--
Steve
_______________________________________________
dba-OT mailing list
dba-OT at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/dba-ot
Website: http://www.databaseadvisors.com