Query Trouble

[ironhide]

Hi, when I call rs.open I get the error: Too few parameters, Expected 1.

Dim cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    Dim sql As String
    Dim cboText As String
    
    Set cn = New ADODB.Connection
    cn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};" & _
           "Dbq=h:\project\db1.mdb;" & _
           "Uid=admin;" & _
           "Pwd="
    cn.Open
    Set rs = New ADODB.Recordset
    cboText = cboClass.Text
    sql = "SELECT StudentName FROM tblStudents WHERE " & _
                                "StudentClass1 = " & Quotes(cboText) & " OR " & _
                                "StudentClass2 = " & Quotes(cboText) & " OR " & _
                                "StudentClass3 = " & Quotes(cboText) & " OR " & _
                                "StudentClass4 = " & Quotes(cboText) & " OR " & _
                                "StudentClass5 = " & Quotes(cboText) & " OR " & _
                                "StudentClass6 = " & Quotes(cboText) & " OR " & _
                                "StudentClass7 = " & Quotes(cboText) & " OR " & _
                                "StudentClass8 = " & Quotes(cboText) & " OR " & _
                                "StudentClass9 = " & Quotes(cboText) & " OR " & _
                                "StudentClass10 = " & Quotes(cboText)
    MsgBox sql
    rs.Open sql, cn2
    rs.MoveFirst
    Do While Not rs.EOF

Any ideas?

[brucevde]

The usuall culprits for this error -

One of the database field names is misspelled.

Character data is not surrounded with single quotes.

"StudentClass1 = '" & Quotes(cboText) & "' OR " & _

[Dalceon]

Originally posted by brucevde
The usuall culprits for this error -

One of the database field names is misspelled.

Character data is not surrounded with single quotes.

"StudentClass1 = '" & Quotes(cboText) & "' OR " & _

since he's using access, doesn't he need to use double quotes??
simplest thing to do is debug.print sql and post it.
or you may find the problem.

[brucevde]

since he's using access, doesn't he need to use double quotes??

Nope.

[ironhide]

The sql is statement is (using debug.print)
SELECT StudentName FROM tblStudents WHERE StudentClass1 = "12SDD" OR StudentClass2 = "12SDD" OR StudentClass3 = "12SDD" OR StudentClass4 = "12SDD" OR StudentClass5 = "12SDD" OR StudentClass6 = "12SDD" OR StudentClass7 = "12SDD" OR StudentClass8 = "12SDD" OR StudentClass9 = "12SDD" OR StudentClass10 = "12SDD"

When calling rs.open still gives me the too FEW ?? parameters, expected one...

Any help?

Ta.