webForumDet fria alternativet

Too few parameters??

13 svar · 383 visningar · startad av webbSAJTEN

webbSAJTENMedlem sedan jan. 2002992 inlägg
#1

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

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

/gastbok_inlagg.asp, line 30

På rad 30 står: objRS.Open strSQL, objConn

Jag förstår inte vad som kan vara fel..
ni kan gå in här och kolla: http://www.jimmygronwall.se/gastbok_index.asp

JosefMedlem sedan mars 20023 561 inlägg
#2

Det är fel i variabeln strSQL.. Posta den...

@ndersMedlem sedan juni 200032 969 inlägg
#3

Du har angett ett felaktigt tabell- eller fältnamn i frågan.
Det hade nog en sökning på wF kunnat upplysa dig om.

webbSAJTENMedlem sedan jan. 2002992 inlägg
#4

Hur menar du? Hur postar man den??

cyprysMedlem sedan dec. 20003 563 inlägg
#5

Hur ser den ut?
Skriv den i ett inlägg i denna tråd.

webbSAJTENMedlem sedan jan. 2002992 inlägg
#6

Detta tror jag är den viktiga koden..

<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("gastbok_databas.mdb")
%>
<%
Dim strSQL
strSQL = "SELECT * FROM inlagg ORDER BY id DESC"
%>
<%
Dim objRS
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open strSQL, objConn
%>
<% if objRS.EOF Then %>
<font face="Verdana">
<b>
<i>Det finns inga inlägg i gästboken</i></b> <br>
<%
Else Do While Not objRS.EOF
%>
webbSAJTENMedlem sedan jan. 2002992 inlägg
#7

Jag har kollat allt både 2 och 3 gånger och alla namn stämmer..

JosefMedlem sedan mars 20023 561 inlägg
#8

Ojdå! Vad många kontext-switchar du använder... Skriv så här istället:

<%
Dim objConn, objRs, strSQL
Set objConn = Server.CreateObject("adodb.COnnection")
objConn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("gastbok_databas.mdb")
strSQL = "SELECT * FROM inlagg ORDER BY id DESC"
Set objRs = Server.CreateObject("adodb.RecordSet")
objRs.Open strSQL, objConn

If objRs.EOF Then
    Response.Write("<font face=verdana><b>Det finns inga inlägg i databasen</b><br>")
Else
    Do While Not objRs.EOF
    ....
End If
%>
webbSAJTENMedlem sedan jan. 2002992 inlägg
#9

Nu får jag upp:
Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

/gastbok_inlagg.asp, line 25

Dim objConn, objRs, strSQL
Set objConn = Server.CreateObject("adodb.COnnection")
objConn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("gastbok_databas.mdb")
strSQL = "SELECT * FROM inlagg ORDER BY id DESC"
Set objRs = Server.CreateObject("adodb.RecordSet")
objRs.Open strSQL, objConn

Linje 25: objRs.Open strSQL, objConn

CalevanMedlem sedan maj 20031 173 inlägg
#10

hur ser din gastbok_databas.mdb ut? dvs vilka tabeller har du där och vad heter fälten?

cyprysMedlem sedan dec. 20003 563 inlägg
#11

Säker på att du har en kolumn som heter "id"?

webbSAJTENMedlem sedan jan. 2002992 inlägg
#12

Där finns namn, email, hemsida, mess, ip...

@ndersMedlem sedan juni 200032 969 inlägg
#13

Calevan skrev:

dvs vilka tabeller har du där och vad heter fälten?

cyprys skrev:

Säker på att du har en kolumn som heter "id"?

@ndersMedlem sedan juni 200032 969 inlägg
#14

Vad bra att det löste sig! :x

Extremt roligt att hjälpa till! :o

134 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)