Hvad er der galt her
Dette viser en større beskrivelse af et produkt.Jeg har prøvet at lave det sådan at hvis den store beskrivelse ikke findes, skulle man få en meddelelse herom, men jeg kan ikke få det til at virke.
Den viser bare det hele uanset hvad.
<html>
<head>
<title>Produktbeskrivelse</title>
<link rel=\"stylesheet\" type=\"text/css\" href=\"style/style.css\">
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
</head>
<body leftmargin=\"0\" topmargin=\"20\" marginwidth=\"0\" marginheight=\"0\">
<%
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"db/brinck.mdb\")
strSQL = \"SELECT * FROM produkter where id=\" & Request.Querystring(\"Id\")
set rs = myconn.execute(strSQL)
stor_beskrivelse = rs(\"stor_beskrivelse\")
If stor_beskrivelse = \"\" then
response.write \"<center>Der findes ingen yderligere\"
response.write \"beskrivelse til denne vare i øjeblikket\"
response.write \"<br>Please check back later</center>\"
response.end
Else
varenr = rs(\"varenr\")
beskrivelse = rs(\"varebeskrivelse\")
Udsalgspris = rs(\"Udsalgspris_incl_moms\")
Billedsti = rs(\"Billedsti_web\")
%>
<table width=\"360\" border=\"2\" cellspacing=\"0\" cellpadding=\"0\" bordercolor=\"#000000\" background=\"Billeder/brinck3.jpg\" height=\"210\" align=\"center\">
<tr>
<td>
<%
response.write \"<table width=\"\"360\"\" border=\"\"1\"\" cellspacing=\"\"0\"\" cellpadding=\"\"3\"\" height=\"\"210\"\">\"
response.write \"<tr><td width=\"\"128\"\"><font color=\"\"#000000\"\">Varenr</font></td>\"
response.write \"<td width=\"\"93\"\">\"
response.write varenr
response.write \"</td>\"
response.write \"<td width=\"\"139\"\">\"
response.write beskrivelse
response.write \"</td></tr>\"
response.write \"<tr><td colspan=\"\"2\"\">\"
response.write stor_beskrivelse
response.write \"</td>\"
response.write \"<td width=\"\"139\"\"><img src=\"\"\"& Billedsti &\"\"\"></td></tr>\"
response.write \"<tr><td colspan=\"\"2\"\"><div align=\"\"right\"\"><font color=\"\"#000000\"\">Pris DKK</font></div></td>\"
Response.Write \"<td width=\"\"139\"\"><div align=\"\"right\"\">\"
Response.Write formatnumber(rs(\"Udsalgspris_incl_moms\"),2) & \"</div></td></tr>\"
response.write \"<tr><td colspan=\"\"2\"\"> </td>\"
response.write \"<td width=\"\"139\"\"><a href=\"\"java script:window.close()\"\">Luk vindue</a></td></tr></table>\"
end if
%>
</td>
</tr>
</table>
<%
myconn.Close
Set myconn = Nothing
%>
</body>
</html>
