Ahh, when you said ID in the first post, I assumed you meant the record ID. You said that you changed the recordID to StoreNumber. Is StoreNumber the name of the bound field in the form, or the name of the field in the record? This might be causing that parameter box to pop up. For instance, if the field in the record is named StoreNumber, but the field in the form is Store_Number, Store_Number would need to be put into the code, so double-check that.
Also, as far as the clear that you have, post the code that you have behind that so I can take a look.
Yea, and I just realized my clear is working a delete. Awesome...
I was being vague to make sure I didn't breach company policy. But I've decided that I really need to get this working, lol. As far as bound fields... there are a lot of those in my form. I was under the impression that once the store number is populated, they would need to be bound in order to pull the information.
My data base consists of the Table: Tbl_Store Data, and a Form: Frm_Store Data Find. My form contains a text box for every field in the table, and they are all bound. Most locked, but some are not in the case of a district re-alignment or what-have you. Obviously, the form is based on the table. I really think that the problem lies in the program of the button.
Just for kicks, I've put a combo box in there and I was able to get it to work that way. I know I'm a pain, but I really my idea to work without it.
Here is the code behind the "search button":
Private Sub Search_Click()
Me.Filter = "StoreNumber" = " & Me.Text_StoreNumber.Value"
DoCmd.RunCommand acCmdApplyFilterSort
End Sub
And here is the "Clear":
Private Sub Clear_Click()
Me.Text_StoreNumber.Value = ""
Me.Text_Address.Value = ""
Me.Text_City.Value = ""
Me.Text_State.Value = ""
Me.Text_phone.Value = ""
Me.Text_Fax.Value = ""
Me.Text_eFax.Value = ""
Me.Text_NPI.Value = ""
Me.Text_NABP.Value = ""
Me.Text_TAXid.Value = ""
Me.Text_Area.Value = ""
Me.Text_Region.Value = ""
Me.Text_Zone.Value = ""
Me.Text_District.Value = ""
Me.Text_Update.Value = ""
Me.Text_CloseDate.Value = ""
Me.Text_AudAsst.Value = ""
Me.Text_DMname.Value = ""
Me.Text_DMphone.Value = ""
Me.Text_DMemail.Value = ""
Me.Text_RXSname.Value = ""
Me.Text_RXSphone.Value = ""
Me.Text_RXSemail.Value = ""
Me.Text_Comment.Value = ""
End Sub