08. maj 2001 - 20:28
Der er
28 kommentarer og 2 løsninger
???
Jeg har to sider: Produkter.asp <html> <title>Hente data fra database</title> <head> </head> Jeg får denne fejlmeddelse: Microsoft OLE DB Provider for ODBC Drivers (0x80040E10) [Microsoft][ODBC Microsoft Access-driver] Der er for få parametre. Der var ventet 1. /ep/produkter.asp, line 16 <body> <dl> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Where Id = \'\" & Request.Querystring(\"varenr\") & \"\'\" Set rs = Conn.Execute(strSQL) Response.Write \"<dt>Navn:</dt><dd>\" & rs(\"varenr\") & \" \" & rs(\"varenr\") & \"</dd>\" Response.Write \"<dt>Telefon:</dt><dd>\" & rs(\"varenr\") & \"</dd>\" Conn.Close Set Conn = Nothing %> </dl> <p><a href=\"produkter_links.asp\">Retur til listen</a></p> </body> </html> produkter_links: <html> <title>Hente data fra database</title> <head> </head> <body> <ul> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Order by varenr ASC\" Set rs = Conn.Execute(strSQL) Do strNavn = rs(\"varenr\") strLink = \"<a href=\'produkter.asp?id=\" & rs(\"varenr\") & \"\'>\" & strNavn & \"</a>\" Response.Write \"<li>\" & strLink & \"</li>\" rs.MoveNext Loop While Not rs.EOF Conn.Close Set Conn = Nothing %> </ul> </body> </html>
Annonceindlæg fra itavis
??? 08/05 2001 20:28:00 150 point fra sesam Jeg har to sider: Produkter.asp <html> <title>Hente data fra database</title> <head> </head> <body> <dl> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Where Id = \" & Request.Querystring(\"varenr\") & \"\'\" Set rs = Conn.Execute(strSQL) Response.Write \"<dt>Navn:</dt><dd>\" & rs(\"varenr\") & \" \" & rs(\"varenr\") & \"</dd>\" Response.Write \"<dt>Telefon:</dt><dd>\" & rs(\"varenr\") & \"</dd>\" Conn.Close Set Conn = Nothing %> </dl> <p><a href=\"produkter_links.asp\">Retur til listen</a></p> </body> </html> produkter_links: <html> <title>Hente data fra database</title> <head> </head> <body> <ul> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Order by varenr ASC\" Set rs = Conn.Execute(strSQL) Do strNavn = rs(\"varenr\") strLink = \"<a href=\'produkter.asp?id=\" & rs(\"varenr\") & \"\'>\" & strNavn & \"</a>\" Response.Write \"<li>\" & strLink & \"</li>\" rs.MoveNext Loop While Not rs.EOF Conn.Close Set Conn = Nothing %> </ul> </body> </html>
strSQL = \"Select * From prisliste Where Id = \" & Request.Querystring(\"varenr\")
ericjacobsen -> 1 sec for sent....;-)
men min er rigtig i modsætning til din :)
nu får jeg denne fejmeddelse: Microsoft OLE DB Provider for ODBC Drivers (0x80040E14) [Microsoft][ODBC Microsoft Access-driver] Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket \"Id =\". /ep/produkter.asp, line 14
<html> <title>Hente data fra database</title> <head> </head> <body> <dl> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Where Id = \" & Request.Querystring(\"varenr\") Set rs = Conn.Execute(strSQL) Response.Write \"<dt>Navn:</dt><dd>\" & rs(\"varenr\") & \" \" & rs(\"varenr\") & \"</dd>\" Response.Write \"<dt>Telefon:</dt><dd>\" & rs(\"varenr\") & \"</dd>\" Conn.Close Set Conn = Nothing %> </dl> <p><a href=\"produkter_links.asp\">Retur til listen</a></p> </body> </html> produkter_links: <html> <title>Hente data fra database</title> <head> </head> <body> <ul> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Order by varenr ASC\" Set rs = Conn.Execute(strSQL) Do strNavn = rs(\"varenr\") strLink = \"<a href=\'produkter.asp?id=\" & rs(\"varenr\") & \"\'>\" & strNavn & \"</a>\" Response.Write \"<li>\" & strLink & \"</li>\" rs.MoveNext Loop While Not rs.EOF Conn.Close Set Conn = Nothing %> </ul> </body> </html>
Argh, glemte lige og fjerne den sidste
Når jeg trykker på et af linksne får jeg denne fejlmeddelse: Microsoft OLE DB Provider for ODBC Drivers (0x80040E14) [Microsoft][ODBC Microsoft Access-driver] Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket \"Id =\". /ep/produkter.asp, line 14
<html> <title>Hente data fra database</title> <head> </head> <body> <dl> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste where Id = \" & Request.Querystring(\"varenr\") & \"\" Set rs = Conn.Execute(strSQL) Response.Write \"<dt>Navn:</dt><dd>\" & rs(\"varenr\") & \" \" & rs(\"varenr\") & \"</dd>\" Response.Write \"<dt>Telefon:</dt><dd>\" & rs(\"varenr\") & \"</dd>\" Conn.Close Set Conn = Nothing %> </dl> <p><a href=\"produkter_links.asp\">Retur til listen</a></p> </body> </html> produkter_links: <html> <title>Hente data fra database</title> <head> </head> <body> <ul> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Order by varenr ASC\" Set rs = Conn.Execute(strSQL) Do strNavn = rs(\"varenr\") strLink = \"<a href=\'produkter.asp?id=\" & rs(\"varenr\") & \"\'>\" & strNavn & \"</a>\" Response.Write \"<li>\" & strLink & \"</li>\" rs.MoveNext Loop While Not rs.EOF Conn.Close Set Conn = Nothing %> </ul> </body> </html>
strSQL = \"Select * From prisliste Where Id = \" & Request.Querystring(\"id\")
keysersoze -> argh, der var fejlen ;-)
<html> <title>Hente data fra database</title> <head> </head> <body> <dl> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste where Id = \" & Request.Querystring(\"id\") & \"\" Set rs = Conn.Execute(strSQL) Response.Write \"<dt>Navn:</dt><dd>\" & rs(\"varenr\") & \" \" & rs(\"varenr\") & \"</dd>\" Response.Write \"<dt>Telefon:</dt><dd>\" & rs(\"varenr\") & \"</dd>\" Conn.Close Set Conn = Nothing %> </dl> <p><a href=\"produkter_links.asp\">Retur til listen</a></p> </body> </html> produkter_links: <html> <title>Hente data fra database</title> <head> </head> <body> <ul> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Order by varenr ASC\" Set rs = Conn.Execute(strSQL) Do strNavn = rs(\"varenr\") strLink = \"<a href=\'produkter.asp?id=\" & rs(\"varenr\") & \"\'>\" & strNavn & \"</a>\" Response.Write \"<li>\" & strLink & \"</li>\" rs.MoveNext Loop While Not rs.EOF Conn.Close Set Conn = Nothing %> </ul> </body> </html>
så får jeg denne fejl: Fejltype: Microsoft OLE DB Provider for ODBC Drivers (0x80040E10) [Microsoft][ODBC Microsoft Access-driver] Der er for få parametre. Der var ventet 1. /ep/produkter.asp, line 16
får stadigvæk denne fejl?
strSQL = \"Select * From prisliste Where Id = \'\" & Request.Querystring(\"id\") & \"\'\"
<html> <title>Hente data fra database</title> <head> </head> <body> <dl> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste where varenr = \" & Request.Querystring(\"id\") & \"\" Set rs = Conn.Execute(strSQL) Response.Write \"<dt>Navn:</dt><dd>\" & rs(\"varenr\") & \" \" & rs(\"varenr\") & \"</dd>\" Response.Write \"<dt>Telefon:</dt><dd>\" & rs(\"varenr\") & \"</dd>\" Conn.Close Set Conn = Nothing %> </dl> <p><a href=\"produkter_links.asp\">Retur til listen</a></p> </body> </html> produkter_links: <html> <title>Hente data fra database</title> <head> </head> <body> <ul> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Order by varenr ASC\" Set rs = Conn.Execute(strSQL) Do strNavn = rs(\"varenr\") strLink = \"<a href=\'produkter.asp?id=\" & rs(\"varenr\") & \"\'>\" & strNavn & \"</a>\" Response.Write \"<li>\" & strLink & \"</li>\" rs.MoveNext Loop While Not rs.EOF Conn.Close Set Conn = Nothing %> </ul> </body> </html>
Om man sætter ... & \"\" bagefter er inderligt ligegyldigt. Man får fejlen Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket \"Id =\". når - i dette tilfælde - Request.Querystring(\"id\") er tom.
sesam > Brug den kode jeg lige har skrevet! den burde virke!
Du mener vel Request.Querystring(\"varenr\") ?
Nej, for på produkter_links.asp er linket: produkter.asp?id=\" & rs(\"varenr\") & \"
Når jeg skriver det får jeg stadigvæk en fejlmeddelse
PRODUKTER.APS START! ----------------------------------- <html> <title>Hente data fra database</title> <head> </head> <body> <dl> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste where varenr = \" & Request.Querystring(\"id\") Set rs = Conn.Execute(strSQL) Response.Write \"<dt>Navn:</dt><dd>\" & rs(\"varenr\") & \" \" & rs(\"varenr\") & \"</dd>\" Response.Write \"<dt>Telefon:</dt><dd>\" & rs(\"varenr\") & \"</dd>\" Conn.Close Set Conn = Nothing %> </dl> <p><a href=\"produkter_links.asp\">Retur til listen</a></p> </body> </html> ----------------------------------- PRODUKTER.APS SLUT produkter_links.asp start ----------------------------------- <html> <title>Hente data fra database</title> <head> </head> <body> <ul> <% Set Conn = Server.CreateObject(\"ADODB.Connection\") DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DSN = DSN & \"DBQ=\" & Server.MapPath (\"varer.mdb\") Conn.Open DSN strSQL = \"Select * From prisliste Order by varenr ASC\" Set rs = Conn.Execute(strSQL) Do strNavn = rs(\"varenr\") strLink = \"<a href=\'produkter.asp?id=\" & rs(\"varenr\") & \"\'>\" & strNavn & \"</a>\" Response.Write \"<li>\" & strLink & \"</li>\" rs.MoveNext Loop While Not rs.EOF Conn.Close Set Conn = Nothing %> </ul> </body> </html> ----------------------------------- produkter_links.asp SLUT
Sesam, vis os det link der kalder din side, og fortæl os hvad type \"id\" er i din tabel - vi gætter vist for meget :)
Jubii det virker takker får hjælpen...
Ha ha, ja der kan man bare se.
erhm... hvad var så selve det rigtige resultat? nu bliver jeg pludselig i tvivl, for det var mig der ledte os på sporet af hvilken querystring der skulle efterspørges - og alligevel bliver jeg afvist...
Kurser inden for grundlæggende programmering