finns det någon som kan hitta ett fel i den här koden
<% Response.Buffer = TRUE %>
<% set conn=server.createobject("adodb.connection")
gastbok1="driver={Microsoft Access Driver (*.mdb)}; "
gastbok1=gastbok1 & "dbq=" & server.mappath("\thellassida/db/gastbok.mdb")
conn.open gastbok1
sql = "select*from [gast1] where datum > #" & date()-50 & "#"
sql = sql & "order by gastid desc"
set rs = conn.execute(sql) %>
<html>
<head>
<title>Thellas gästbok</title>
<style type="text/css">
<!--
a { text-decoration:none }
//-->
</style>
</head>
<body bgcolor="#999999">
<center>
<a href="gast2.asp"><font color="#ffffff" face="verdana" size"2">Om du vill skriva ett inlägg så klicka här</font></a>
<br>
<br>
<table width="75%" border="0" cellspacing=0 cellpadding=3>
<% do until rs.eof %>
<tr bgcolor="#666666">
<%if len(rs ("Namn")) = 0 then %>
<td bgcolor="#666666"> </td>
<% else %>
<td bgcolor="#666666"><font color="<% =rs ("textfarg") %>"><font face="verdana" size"2"><% =rs ("Namn") %></font></font></td>
<% end if %>
<%if len(rs ("epost")) = 0 then %>
<td bgcolor="#666666"> </td>
<% else %>
<td bgcolor="#666666" width="100"><font color="<% =rs ("textfarg") %>" face="verdana" size"2"><% =rs ("epost") %></font></td>
<% end if %>
<td bgcolor="#666666" width="600" align="Right"><font color="<% =rs ("textfarg") %>" face="verdana" size"6"><% =rs ("Datum") %></font></td>
</tr>
<tr>
<%if len(rs ("amne")) = 0 then %>
<td bgcolor="#666666"> </td>
<% else %>
<td bgcolor="#666666"><font color="<% =rs ("textfarg") %>" face="verdana" size"2"><% =rs("amne")%></font></td>
<td colspan="2" bgcolor="#999999"> </td>
<% end if %>
</tr>
<tr>
<td colspan="3"><font color="<% =rs ("textfarg") %>" face="verdana" size"2"><% =rs("inlagg")%></font></td>
</tr>
<% rs.movenext
loop
rs.close
conn.close %>
</table>
</center>
</body>
</html>
