Ignore Date Range If Blank

[Rustin788]

Hey,

I am creating a form for someone so they can pull up customer information. I have it set up so they can search by Sales Order #, Customer, or just put in a date range. My question is; is there a way set up the date fields so that if they are blank they are ignored when it runs the query. Right now if I do not include dates when searching it returns just a blank query. Currently in the query I have: Between [Forms]![Form Lookup]![BegOrd] And [Forms]![Form Lookup]![EndOrd].

Thanks for any help.

[ranman256]

Test all controls for a possible filter...

dim sSql as string, sWhere as string
if not isnull(cboState) then   sWhere = sWhere & " and [state]='" & cboState & "'"
if not IsNull(txtName) then    sWhere = sWhere & " and [Name]='" & txtName & "'"
if not IsNull(chkContact) then sWhere = sWhere & " and [Contact]=" & chkContact.value

    'remove 1st And
sWhere= mid(sWhere,4)
sSql = "SELECT * FROM tblCompany WHERE "
sSql = sSql & sWhere
frmResults.Recordsource = sSql

[pbaldy]

Try

Between Nz([Forms]![Form Lookup]![BegOrd], #1/1/1929#) And Nz([Forms]![Form Lookup]![EndOrd], #12/31/2029#)

Using appropriate dates that would include all your data.