Fejl

Jeg får nedenstående fejl:
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 2.

når jeg kører følgende kode:

' Connection til database
Set con = server.createobject("ADODB.Connection")
DBPath = "DBQ=" & server.mappath("db/test.mdb")
Con.Open "driver={Microsoft Access Driver (*.mdb)}; " & DBPath

' SQL Forespørgsel til DB
SQL = "SELECT * From Suppliers where DUNSNUM LIKE '" & DUNSNUM & "' OR COMPNAME LIKE '" & COMPNAME & "' OR TRADESSTYLE LIKE '" & TRADESSTYLE & "'" OR PHYSADDR1 LIKE '" & PHYSADDR1 & "' OR PHYSADDR2 LIKE '" & PHYSADDR2 & "' OR POSTAL_CD LIKE '" & POSTAL_CD & "' OR CITY LIKE '" & CITY & "' OR STATE_PROV LIKE '" & STATE_PROV & "' OR COUNTRY LIKE '" & COUNTRY & "' OR CNTRYACCCD LIKE '" & CNTRYACCCD & "' OR TELEPHONE LIKE '" & TELEPHONE & "' OR CEO_NAME LIKE '" & CEO_NAME & "' OR CEO_TITLE LIKE '" & CEO_TITLE & "' OR LINE_BUSIN LIKE '" & LINE_BUSIN & "' OR SIC1 LIKE '" & SIC1 & "' OR DIVISION LIKE '" & DIVISION & "' OR DIVISION_DESCRIPTION LIKE '" & DIVISION_DESCRIPTION & "' OR SIC2 LIKE '" & SIC2 & "' OR SIC2_DESCRIPTION LIKE '" & SIC2_DESCRIPTION & "' OR SIC4 LIKE '" & SIC4 & "' OR SIC4_DESCRIPTION LIKE '" & SIC4_DESCRIPTION & "' OR LOCALSALES LIKE '" & LOCALSALES & "'"

Set Record = Con.Execute(SQL

Er der een der kan se hvad jeg gør forkert?