Search results

Error Number 3101

no part of the code is highlighted, just gives my error and then the MS error message

sorry the form is a customer sales order form. main form has all the details about the customer sub form has all the details of the order if the user tries to do something with the sub form before they have entered a customer No on the main form it says "The MS Jet engine could not find...

I am trying to trap an error and get rid of access built in error msgbox. I used this On Error Resume Next MsgBox "You need to enter a customer number" Me.CustomerNo.SetFocus Me.CustomerNo.Dropdown in the Error event of the form, it works but still brings up the microsft error afterwards any...

in the on error event of the form I put Msgbox "You have already selected this part number. " Me.PartNo.setfocus Me.partNo.dropdown It works ok but still produces the access error messages Any Ideas

If you are on a form and you add a duplicate value. you get MS horrible message can you get rid of this and have your own thanks

Hi I have to create some graphs to show sales trends. I am not allowed to use the wizard. can any give me an idead of how to do it, I have never used graphs before Thanks

I have to forms (Main ) with a Sub form (MySub) The sub form is not linked to the main form. From the form (Main ) can you reference the form (My sub) to goto a new record Thanks

I am trying to open a form like this Dim filter As String filter = [EmployeeNo] = vNum * vNum is a global Variable which hold the employee number when the user signs in DoCmd.OpenForm "frmInvoiceLines", , filter does not work Any help would be great thanks

Thanks again

Thanks for the help I almost have it working but I get the error "Missing Operator" In this code varPassword = DLookup("Password", "tblPassword", "[UserID]=' " & strU & "'" & _ "[Question]= '" & strQ & "'" & _ "[Answer]= '" & strA & "'")

this is what I use (adapted from a previous post) rivate Sub CmdOk_Click() On Error GoTo txtPassword_AfterUpdateError 'Sign into program - ask for Users name If CNStr([txtUserID]) = "" Then MsgBox "Please Enter Your User Name" Me![txtUserID].SetFocus Exit Sub...

I have a form which has the fields txtUserID, txtQuestion, txtAnswer, txtPassword gthe form is unbound and should allow the user to enter the details in the fields above. when the user presses OK the DB will user a DLOOKUP to match the txtUserID, txtQuestion and txtAnswer to the fields in the...

I have a form with lots of buttons that open different forms. Which acts as the main menu for the DB. Has any one got any good examples of a main menu form mine looks very cluttered Thanks

Can you explain how you do this £#,##0.00[Black];£#,##0.00[Red], thanks

the code does work But the form the control is on is a sub form I have tried all the EVents but non of them will pick it up Any ideas Thanks

Thanks just got two questions YourControl.ForeColor = IIf(Sgn(YourNumber) = -1, vbRed, Is YourControl the txtbox that contains the number What is YouNumber

If a number is a negitive how do you change the font colour to RED Thanks

Re: Re: Filter problem sorry My non expert typing skills again. I have a form called Employees. From that form I call another form called (dlg Filter Employees) on the form (dlg Filter Employees) I can select certain filters i.e. Name, Type, Year started. When I press ok on this form (dlg...

I am calling a filter dlg form a form where i select a the criterion. If there are no recods that match the criteria then form goes blank how do i say if there are records that match the criteria then don't filter