linke

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>

Det virker ikke. Jeg for denne fejlmeddelelse. Kan i hjælpe???

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 16