Problem med begyndelse på et forum

Jeg har altså NOGET af et problem - jeg er ved at lave (mit første) forum til min side, men når jeg afprøver det, står den og loader, og loader, og loader, og da der var gået 12 minutter, så gad jeg ikke mere, og indså, at der måtte være en fejl i ASP-koden - men når der ingen fejlmeddelelse er, hvordan skal jeg (en begynder programmer), så finde den?

Håber virkelig at nogen kan hjælpe!

<% If Request.Querystring("mode") = "add" Then %>
    <form method="post" action="default.asp?mode=save">
    <table>
    <tr>
    <td>Overskrift</td>
    <td><input type="text" name="overskrift"></td>
    </tr>
    <tr>
    <td>Besked</td>
    <td><textarea rows="8" name="BESKRIVELSE" style="width: 340"></textarea></td>
    </tr>
    </table>
    </form>
<% Elseif Request.Querystring("mode") = "save" Then %>
    <%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("../community.mdb")
    Conn.Open DSN
    strSQL = "Insert into board (IP, DATO, TID, NAVN, BESKED) values('" & Request.Servervariables("REMOTE_ADDR") & "','" & FormatDateTime(Now(),1) & "','" & FormatDateTime(Now(),2) & "','" & Session("mode") & "','" & Request.Form("BESKED") & "')"
    Conn.Execute(strSQL) %>
<% Elseif Request.Querystring("mode") = "all" Then %>
    <table>
    <%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("../community.mdb")
    Conn.Open DSN
    strSQL = "Select * from board order by ID Desc"
    Set rs = Conn.Execute(strSQL)
    Do
    %>
        <tr>
        <td><a href="view.asp?id=<% Response.write rs("dato") %>"><% Response.write rs("overskrift") %></a></td>
        <td>Af <% Response.write rs("navn") %>, d. <% Response.write rs("dato") %> kl. <% Response.write rs("tid") %></td>
        </tr>
    <%
    Loop While Not rs.EOF
    %>
    </table>
<% Else Response.redirect "default.asp?mode=all" %>
<% End if %>
    <%
    Conn.Close
    Set Conn = Nothing
    %>