To Few Parameters. 1 expected

[Jane]

Trying to set up the export of a query to a csv file.
Have set up a Export Specification for that query and all
works fine.

One of the fields i that query is called Ref. When I
introduce a criteria to that field of =Forms!Inquiry!
[Ref] and try and reset the Export Specification, I get
a "To few Parameters. 1 expected" message.

What has gone wrong and how do I overcome this

Thanks in advance

Jane

 

[Joe Fallon]

Access can figure out what the parameter is when the query is run in the
grid. Then Access will inform the Jet Engine what it is.

However, when the same query is run in code, you must tell the Jet engine
what the
parameter is yourself.

This is the slickest way to do it:

With queries that contain parameters that are all references to
controls on open forms, you can simulate the expression service that Access
provides when the queries are run through the user interface, as follows:

Set db = CurrentDb
Set qdf = db.QueryDefs("MyQuery")
Dim prm As Parameter

For Each prm In qdf.Parameters
prm.Value = Eval(prm.Name)
Next prm

Set rs = qdf.OpenRecordset(dbOpenDynaset)
' or qdf.Execute dbFailOnError