Input box on query

[iMatt]

Hi

I'm trying to get a query to handle a input box like so:

'input box for w/c

inputdate = InputBox(Prompt:="Enter Mondays date", Title:="date Input")


    
    
'SET DB AND FIELDS

Set db = CurrentDb
    
'Set rs = db.OpenRecordset("SELECT * FROM tbl_Schedule WHERE (((tbl_Schedule.Date)='& inputdate &'))")

I notice that the query works in this format:

 Set rs = db.OpenRecordset("SELECT * FROM chaseupEmail WHERE (((chaseupEmail.Date)=#14-may-12#))")

But when I enter the date 14-may-12 in the input box, the query does not recognise the date.

Any help would be greatly appreciated
Matt

[westconn1]

But when I enter the date 14-may-12 in the input box, the query does not recognise the date.

you would need to validate the date and make sure it is the correct format for the database
access must be mm/dd/yyyy, regardless of your locale
also as you can see dates should be enclose in # rather than '
so your query should look like

rs = db.OpenRecordset("SELECT * FROM tbl_Schedule WHERE (((tbl_Schedule.Date)=#" & inputdate & "#))")

[techgnome]

It WOULD recognize it if you put # delimiters around it.... right now your query looks like this:
WHERE (((tbl_Schedule.Date)='& inputdate &'))")

Actually there's two things wrong... first no date delimiters (#) and secondly since you used single tick marks, you inserted the string literal & inputdate & into your query... it should look like this:


WHERE (((tbl_Schedule.Date)=#" & inputdate & "#))")


-tg

[iMatt]

you my friend, are a hero

thank you very much

[techgnome]

if your issue has been resolved, please mark the thread resolved. You can do this by using the Mark as Resolved menu item under the Thread Tools at the top of post 1.

-tg