Udskriv acces tebel

Hej jeg får følgende fejl når jeg køre denne kode:

<%
    strSQL = "Select * from debat order by dato DESC"
    Set rs = Conn.Execute(strSQL)
response.write "<h1>Debat</h1>"
response.write "<p><a href='index.asp?side=debat&vis=tilfoej'>Skriv et indlæg</a></p>"
response.write "      <table border='0' width='90%'>"
do
    response.write "        <tr>"
    response.write "          <td width='100%' bgcolor='#C0C0C0'>" & rs("dato") & "</td>"
    response.write "        </tr>"
    response.write "        <tr>"
    response.write "          <td width='100%'><b><a href='mailto:" & rs("email") & "'>" & rs("navn") & "</a>"
    response.write "      mener:</b></td>"
    response.write "        </tr>"
    response.write "        <tr>"
    response.write "          <td width='100%'>" & rs("kommentar") & "</td>"
    response.write "        </tr>"
    rs.movenext
loop while not rs.EOF
response.write "      </table>"
response.write "<p>&nbsp;</p>"
response.write "<p>&nbsp;</p>"

%>

fejl: Fejltype:
Der opstod en Microsoft VBScript-kørselsfejl (0x800A01A8)
Et objekt er obligatorisk: ''
/debat/debat.asp, line 4

Sig endelig vis der er flere fejl....jeg er stadig ny omkring det med asp og db