Passing parameters

[reburton]

I am trying to pass a parameter to a query and it won't take it. I am using this line to do it: DoCmd.SetParameter "[Last Date]", StrDate


Where strDate is the variable in string form. I have tried using a date value and neither affects the query at all. It just ignores it. If I run the query from the access interface it accepts the parameter when I type it in. Am I doing something wrong?

[Bob Fitz]

I am trying to pass a parameter to a query......

I've not heard of this before. Can you explain a bit more about what you are actually trying to do.

[reburton]

I am trying to run some queries that all have a parameter asking for a date. The date comes from another query's results. I tried to figure out how to get the date directly from the query but I don't know enough about SQL to do the job. Then I tried to do it from VBA (I was writing a sub to run the queries anyway.). I found this line of code somewhere and tried to apply it, but it doesn't seem to work. Someone suggested that I put it in a form and have the queries get it there, but again I don't know enough SQL to do that either. I'm obviously very new to this.

[Bob Fitz]

IMHO queries should be used to delete, update and retrieve data. Viewing that data should be done with reports and forms. A parameter query is just a select query that requests some criteria when it runs. This request for criteria could be replaced with an expression that gets the input from a control (probably a text box) on an open form.
So, what you could do is this:

The date comes from another query's results.

Create a form to display this data. Let’s call this form frmOriginalData.

I am trying to run some queries that all have a parameter asking for a date

Create a form to display this data. Let’s call this form frmParamQry. In the query for this form, replace the criteria with an expression that references the control on frmOriginalData, that has the value that had been required for the parameter query. This will be some thing like:
Forms!frmOriginalData.NameOfControl
Now create a button on the form called frmOriginalData that opens the form called frmParamQry. The code for this button would be:
DoCmd.OpenForm " frmParamQry "
I would actually remove the criteria from the query for the form called frmParamQry and set the criteria with the line of code that opens the form. Something like:
DoCmd.OpenForm "Form1", , , [YourDateField] = #“ & FormControlName & “#”
The # signs are required as the data is a date.