I will check on Tuesday Lonnie when I return to work....I was so intent on seeing a missing reference marker that I forgot to check for one that just wasn't checked at all! Thank you! Dave
________________________________ From: [email protected] on behalf of Lonnie Johnson Sent: Thu 7/5/2007 5:08 PM To: [email protected] Subject: **SPAM**Re: [ms_access] Question? Form filter quit Is the DAO 3.6 checked in your references? May God bless you beyond your imagination! Lonnie Johnson ProDev, Professional Development of MS Access Databases Visit me at ==> http://www.prodev.us <http://www.prodev.us/> ----- Original Message ---- From: Dave Moreau <[EMAIL PROTECTED] <mailto:davem%40mscaa.com> > To: [email protected] <mailto:ms_access%40yahoogroups.com> Sent: Thursday, July 5, 2007 9:23:34 AM Subject: [ms_access] Question? Form filter quit My form filter quit working this week and I am not sure why. The only change was from Windows 2000 to Windows XP. I have checked all references and did not see one missing....any ideas? Here is the code. Private Sub qWorkOrderNumber_ AfterUpdate( ) Dim MyWorkOrder As DAO.Recordset Set MyWorkOrder = Me.RecordsetClone MyWorkOrder. FindFirst "[WorkOrderID] =" & Me.qWorkOrderNumber If MyWorkOrder. NoMatch Then MsgBox "Work Order ID Not Found. Try Again." Else Me.Bookmark = MyWorkOrder. Bookmark End If End Sub Private Sub Command43_Click( ) On Error GoTo Err_Command43_ Click DoCmd.Close Exit_Command43_ Click: Exit Sub Err_Command43_ Click: MsgBox Err.Description Resume Exit_Command43_ Click End Sub Compile error: User Defined type not defined. (Highlights section of code: DIM MyWorkOrder As DAO.Recordset) This e-mail and any attachments may be confidential or legally privileged. [Non-text portions of this message have been removed] __________________________________________________________ Be a better Heartthrob. Get better relationship answers from someone who knows. Yahoo! Answers - Check it out. http://answers.yahoo.com/dir/?link=list&sid=396545433 <http://answers.yahoo.com/dir/?link=list&sid=396545433> [Non-text portions of this message have been removed] This e-mail and any attachments may be confidential or legally privileged. [Non-text portions of this message have been removed]
