What I want to do is pass a paramater into a paramaterised query then open the query to screen without having the promt appear
And or do the same with a report based on a paramatersied query, again without the promt appearing....

The query would be something like

PARAMETER [dPeriodID] IEEEDouble;
SELECT * FROM Data Where PeriodID = [dPeriodID]


Public Sub OpenParameterQuery()
    Dim qdf As DAO.QueryDef

Set qdf = DBEngine(0)(0).QueryDefs("QueryName")
    qdf("[PeriodID]") = 12


DoCmd.OpenQuery "QueryName"


End Sub


What I want to do is more complex than this, I have written this as an example, so changing the SQL is not an option
Any ideas?

I am not sure wha this is that you have written. How is the query being opened? If from a form, and the parameter appears in a control on a form, then you can create a SELECT query, and in the PeriodID field, put this in the Criteria in Design view:

[Forms]![frmYourForm].[dPeriodID]

Alternatively, you can pass a number with this syntax:

sLink = "[PeriodID] = " & dPeriodID

And a string with:

sLink = "[PeriodID] = " & "'" & dPeriodID & "'"

Then in the WHERE section of the OpenQuery command:

DoCmd.OpenQuery "QueryName", , sLink

Does this help?





mmcdonal

Hi,

Thanks.

I guess I'll have to do something with a hidden open form.

Dean