select database

[Charlotte17]

Sto impazzendo. Ho un problema... ho capito da dove arriva l'errore, ma nn so come risolverlo.

Io ho questo codice:

<% 
dim codCategoria
codCategoria = request.QueryString("codCategoria")
Response.Write(codCategoria)
 
set objCon = Server.CreateObject("ADODB.connection")
strPath = Server.MapPath("Database/database.mdb")
objCon.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & strPath
set objRec=server.CreateObject("ADODB.recordset")
strSQL = "select distinct codMarca from Articoli where codCategoria ="&codCategoria
objRec.open strSQL,objCon,3,3
for i= 1 to objRec.recordcount
Response.Write(objRec("codMarca"))
objRec.movenext
next
objRec.close
%>

che mi da il seguente errore:

Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
/amoreepesca/visualizzaprod.asp, line 109

Facendo un po' di prove mi sono accorta che da problemi la riga in grassetto. Ho provato a modificarla in questo modo:
strSQL = "select distinct codMarca from Articoli where codCategoria = 'donna' "

e così funziona.
Ho controllato nel database e i campi sono giusti. A questo punto mi chiedo se sia un problema di dichiarazioni di variabili.

Aiuto

[Santino83_02]

strSQL = "select distinct codMarca from Articoli where codCategoria = '" &codCategoria & "'"

[Charlotte17]

Funziona!
Graaaaazie