Too few Parameters

2 svar · 178 visningar · startad av DiDjo 1 jan. 2004

DiDjoMedlem sedan nov. 2002544 inlägg

Trådstart1 jan. 2004 00:17#1

hej! Varför får jag detta fel:

Microsoft OLE DB Provider for ODBC Drivers error '80040e10' 

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1. 

/kommun/maklaren_kop_lagenhet.asp, line 24

På denna kod:


Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("aa.mdb")
Set rs2 = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM lagenheter WHERE adress = '"&Request.Querystring("adress")&"' AND adressnr = "&Request.Querystring("nr")&" AND adressbok = "&Request.Querystring("bok")
rs2.Open Addera, Connect, 3, 3

Gott nytt!

mikulMedlem sedan aug. 20013 824 inlägg

1 jan. 2004 05:10#2

Testa detta:

Dim Sql 'as string
Dim connect, rs 'as objects

Sql = "SELECT * FROM lagenheter WHERE adress = '"&_ 
Request.Querystring("adress") &"' AND adressnr = "&_ 
Request.Querystring("nr") &" AND adressbok = "&_ 
Request.Querystring("bok") & ";"

Set Connect = server.createobject("adodb.connection")
Connect.Open "provider=microsoft.jet.oledb.4.0; data source ="& Server.Mappath("aa.mdb")

     set rs = Connect.execute(Sql)

          If rs.eof then
               '// Kod
          Else
               '// Annan kod
          End if

     rs. Close
     Set rs = Nothing

Connect.Close
Set Connect = Nothing

Är det så att kolumnen adressbok är av typen text och inte tal så skall sql-frågan se ut så här:

Sql = "SELECT * FROM lagenheter WHERE adress = '"&_ 
Request.Querystring("adress") &"' AND adressnr = "&_ 
Request.Querystring("nr") &" AND adressbok = '"&_ 
Request.Querystring("bok") & "';"

Kolla även så att du verkligen skickar med nått värde i "Querystingsen".

DiDjoMedlem sedan nov. 2002544 inlägg

1 jan. 2004 12:30#3

/r tack!