Avatar billede sesam Nybegynder
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>
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:30 #1
  ??? 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>
Avatar billede erikjacobsen Ekspert
08. maj 2001 - 20:30 #2
strSQL = \"Select * From prisliste Where Id = \" & Request.Querystring(\"varenr\")
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:30 #3
ericjacobsen -> 1 sec for sent....;-)
Avatar billede erikjacobsen Ekspert
08. maj 2001 - 20:31 #4
men min er rigtig i modsætning til din :)
Avatar billede sesam Nybegynder
08. maj 2001 - 20:33 #5
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
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:34 #6
<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>
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:34 #7
Argh, glemte lige og fjerne den sidste
Avatar billede sesam Nybegynder
08. maj 2001 - 20:37 #8
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
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:38 #9
<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>
Avatar billede keysersoze Ekspert
08. maj 2001 - 20:42 #10
strSQL = \"Select * From prisliste Where Id = \" & Request.Querystring(\"id\")
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:43 #11
keysersoze -> argh, der var fejlen ;-)
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:44 #12
<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> 
Avatar billede sesam Nybegynder
08. maj 2001 - 20:44 #13
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
Avatar billede sesam Nybegynder
08. maj 2001 - 20:45 #14
får stadigvæk denne fejl?
Avatar billede keysersoze Ekspert
08. maj 2001 - 20:46 #15
strSQL = \"Select * From prisliste Where Id = \'\" & Request.Querystring(\"id\") & \"\'\"
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:46 #16
<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> 
Avatar billede erikjacobsen Ekspert
08. maj 2001 - 20:46 #17
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.
Avatar billede sesam Nybegynder
08. maj 2001 - 20:47 #18
Hvad gør jeg så forkert?
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:48 #19
sesam > Brug den kode jeg lige har skrevet! den burde virke!
Avatar billede erikjacobsen Ekspert
08. maj 2001 - 20:48 #20
Du mener vel Request.Querystring(\"varenr\")  ?
Avatar billede sesam Nybegynder
08. maj 2001 - 20:49 #21
Det gør den altså ikke
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:49 #22
Nej, for på produkter_links.asp er linket: produkter.asp?id=\" & rs(\"varenr\") & \"
Avatar billede sesam Nybegynder
08. maj 2001 - 20:49 #23
Når jeg skriver det får jeg stadigvæk en fejlmeddelse
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:50 #24
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
Avatar billede erikjacobsen Ekspert
08. maj 2001 - 20:51 #25
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 :)
Avatar billede sesam Nybegynder
08. maj 2001 - 20:52 #26
Jubii det virker takker får hjælpen...
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 20:53 #27
Hvem kan ;-)
Avatar billede erikjacobsen Ekspert
08. maj 2001 - 20:54 #28
Ha ha, ja der kan man bare se.
Avatar billede keysersoze Ekspert
08. maj 2001 - 20:59 #29
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...
Avatar billede bjarke-b Nybegynder
08. maj 2001 - 21:00 #30
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester