Rocky Smolin at Beach Access Software
rockysmolin at bchacc.com
Mon Feb 26 11:26:14 CST 2007
Gustav: Figured it out. I had some old code in there governing the Got Focus and Lost Focus events on the combo box. Removed that and the problem went away. Thanks Rocky -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Monday, February 26, 2007 8:54 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] You canceled the previous operation (but I didn't) Hi Rocky Try with: If Me.RecordsetClone.NoMatch = True Then MsgboxUni Me.hWnd, TranslateMsgbox("PartNumberNotFound"), , vbExclamation Me.RecordsetClone.MoveFirst End If Me.Bookmark = Me.RecordsetClone.Bookmark 'Me.cmdExitDemandSide.SetFocus 'cboPartsList.Visible = False Also, you should assign RecordsetClone to a Recordset and then manipulate that. /gustav >>> rockysmolin at bchacc.com 26-02-2007 17:39:07 >>> Dear List: Can anyone see why I should get an error "2001 - you cancelled the previous operation" on the statement Me.Bookmark = Me.RecordsetClone.Bookmark in the following? Me.RecordsetClone.FindFirst "[PartNumber] = '" & Me.cboPartsList.Value & "'" MsgBox Me.RecordsetClone.NoMatch If Me.RecordsetClone.NoMatch = True Then MsgboxUni Me.hWnd, TranslateMsgbox("PartNumberNotFound"), , vbExclamation DoCmd.GoToRecord , , acFirst Else Me.Bookmark = Me.RecordsetClone.Bookmark 'Me.cmdExitDemandSide.SetFocus 'cboPartsList.Visible = False End If Interestingly, if I hit debug to the error message (and it opens the code page with that statement highlighted) and I pressF5, it carries on just fine. MTIA, Rocky -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 268.18.4/702 - Release Date: 2/25/2007 3:16 PM