Error on too few parameters expected 3

[haishuoBB]

Hi, I am VBA newbie and I can't figure out what is wrong with my code, it give me the "too few parameters expected 3" error all the time...


Here is my stupid code...

Dim db As DAO.Database
Dim rst As DAO.Recordset
Dim result As DAO.Recordset

Dim str1 As String
Dim str2 As String

Set db = CurrentDb
str1 = "SELECT * FROM Query1;"
str2 = "SELECT * FROM Query2;"
Set rst = db.OpenRecordset(str1, dbOpenSnapshot)
Set result = db.OpenRecordset(str2, dbOpenDynaset)

[pbaldy]

Presumably your queries have form parameters in them:

Too Few Parameters. Expected 1 Error Message

You can try the Eval() function in the query.

[haishuoBB]

Thanks for the advice, can you tell me more like how to use the Eval() function? Where to fit it?

Presumably your queries have form parameters in them:

Too Few Parameters. Expected 1 Error Message

You can try the Eval() function in the query.

[pbaldy]

Around a form reference:

Eval('Forms!FormName.ControlName')

[haishuoBB]

It still not work...and my query is not in the form, it is a intermedia query...How can I deal with that?

[pbaldy]

Sorry, I'm not familiar with intermedia queries.

[haishuoBB]

no worries...it is not the query which I used to build my form with a control, I use these two queries as a intermedia things to select some data and then I will use this two query to build the my final query which will be introduce to the combo box in my form, so I don't know how to use the 'Forms!FormName.ControlName' things in my code here

[pbaldy]

Can you post the db here?