Runtime Error 3061 Expected 3

[kumail123]

I am trying to run a vba procedure. I am unable to because i get a runtime error 3061 expected 3. Here is the code with the problem. The coloured line is what needs to be debugged.


Set rs = cts.OpenRecordset(qry, dbOpenDynaset)
Do While Not rs.EOF
RawMaterial = rs!Product_Weight_lbs


rs.MoveNext
Loop

rs.Close


Any suggestions and assistance is much appreciated!

[pbaldy]

You want to start over here, or pick up where we left off elsewhere?

We already know it's in the building of your variable, which this should help with:

http://www.baldyweb.com/ImmediateWindow.htm

Plus you need to surround your text values with quotes.