Request.querystring problemer
Jeg sider og forsøger at lave noget til svigerfar, men nu er jeg løbet ind i endnu et problem.Det her er hvad jeg får af fejl: (Som i kan se modtager jeg godtnok (hvidvin og Riesling) med Request.Querystring.
Men den henter ikke dataerne fra databasen, den burde finde hvidvin og bagefter Riesling.
hvidvin
Riesling
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression '(hovedmenu = 'hvidvin') AND (undermenu 'Riesling')'.
/vine.asp, line 43
Dette er linie 43 "Set RS = conn.execute(SQL)"
Hele koden ser sådan her ud:
<%
' Connecter til Databasen
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
Sql = "Select * from b_undermenu order by id ASC"
Set RS = conn.execute(SQL)
%>
<html>
<head>
<title>Test 2</title>
<link rel="stylesheet" type="text/css" href="include/style.css">
</head>
<body>
<table border="0" cellpadding="4" cellspacing="4" style="border-collapse: collapse" bordercolor="#111111" width="100%" ID="Table1">
<tr>
<td width="100%">
<img border="0" src="images/overskrifter/overskrift-katalog.gif"></td>
</tr>
<tr>
<td width="100%">
<img border="0" src="images/blank.gif"></td>
</tr>
</table>
<p>
<center>
<%
Response.Write "<h3>" & Request.Querystring("idnummer") & "</h3>"
Response.Write "<h3>" & Request.Querystring("navn") & "</h3>"
%>
</center>
<%
Sql = "select * from b_undermenu where (hovedmenu = '" & Request.querystring("idnummer") & "') AND (undermenu '" & Request.querystring("navn") & "')"
Set RS = conn.execute(SQL)
if not RS.eof then
%>
<div align="center">
<table border="0">
<tr>
<%
counter = 0
do while not RS.eof
undermenu=replace(undermenu, chr(13),"<br>")
%>
<td>
<table border="0">
<tr>
<td align="center" rowspan="9" width="40">
</td>
<td align="center" colspan="2">
<img border="0" src="images/vinflaskerthumbs/<%=RS("thumb")%>.jpg"><br>
</td>
</tr><tr>
<td style="background-color: #EDEDED" colspan="2" >
<img border="0" src="images/blank.gif" width="1" height="1"></td>
</tr><tr>
<td>Produceret: </td>
<td align="right"> <%=RS("Aar")%></td>
</tr><tr>
<td>Vin:</td>
<td align="right">
<%=RS("Vin")%></td>
</tr><tr>
<td>Type:</td>
<td align="right"> <%=RS("Type")%></td>
</tr><tr>
<td colspan="2">
<%=RS("FlStr")%> l. flaske.</td>
</tr><tr>
<td style="background-color: #EDEDED" colspan="2" >
<img border="0" src="images/blank.gif" width="1" height="1"></td>
</tr><tr>
<td colspan="2"><a href="vin-info.asp?idnummer=<%=RS("id")%>">Se mere information her.</a></td>
</tr><tr>
<td colspan="2"><%=RS("Andet")%></td>
</tr>
</table>
</div>
</td>
<%
counter = counter + 1
if counter mod 3 = 0 then
%>
</tr><tr>
<%
end if
RS.movenext
loop
' udfyld resten af cellerne i den aktuelle række
do while counter mod 3 <> 0
%>
<td> </td>
<%
counter = counter + 1
loop
%>
</tr>
</table>
<%
Set conn = Nothing
end if
%>
</body>
</html>
