Arama yaptığımda gelişmiş arama ile ilgili bazı kodlar buldum ancak

Alıntı
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
bu uyarıyı alıyorum.

İşta yazdığım kodlar :

Alıntı
strkategori = Request.Form("kategori")

strmalzeme = Request.Form("malzeme")

straltyil = Request.Form("basyil")

strustyil = Request.Form("bityil")

straltlim = Request.Form("altl")

strustlim = Request.Form("ustl")

Set rs = Server.CreateObject("Adodb.Recordset")

SQL = "SELECT * FROM ilan WHERE "

If IsNumeric(strkategori) Then

SQL = SQL & " kategori = "& strkategori &" "

End If

If strmalzeme <>"" Then

SQL = SQL & "AND malzeme = "& strmalzeme &" "

End If

If straltyil <> Year("1900") Then

SQL = SQL & "AND yas >= "& straltyil &" "

End If

If strustyil <> Year(Now) Then

SQL = SQL & "AND yas <= "& strustyil &" "

End If

If strustlim <>"0" AND IsNumeric(strustlim) Then

SQL = SQL & "AND fiyat >= "& strustlim &" "

End If

If straltlim <>"0" AND IsNumeric(straltlim) Then

SQL = SQL & "AND fiyat <= "& straltlim &" "

End If

Rs.Open SQL, db, 1, 3

If rs.Eof Then

Response.Write "Aradığınız kriterlere uygun sonuç bulunamadı."

Else

Do While Not rs.Eof
Hatanın nerede olduğunu bulamadım. Yardımcı olabilirseniz sevinirim...