checkbox hente data fra db

Hvordan får jeg mine checkboxe til at virke?
Der vises ikke noget i checkboxene.

<%
Set dbCon = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath(VPath & "../../database/database.mdb")
dbCon.open DSN
SQL = "SELECT * FROM emailadr WHERE brugernavn= '" & request.form("brugernavn")& "' AND password= '" & request.form("password") & "'"
Set rs = dbCon.Execute(SQL)
%>


<TABLE WIDTH="200" HEIGHT="60%" BORDER="0" align=center>
<TR>
    <TD><form action=opdatere.asp method=post name=form<%= rs("id") %>>
<input type=hidden name=id value="<%= rs("id") %>">
<input type=text name=fornavn value="<%= rs("fornavn") %>">
<input type=text name=efternavn value="<%= rs("efternavn") %>">
<input type=text name=adresse value="<%= rs("adresse") %>"><BR>
<input type=text name=sted value="<%= rs("sted") %>"><BR>
<input type=text name=tlfnr value="<%= rs("tlfnr") %>"><BR>
<input type=text name=mobil value="<%= rs("mobil") %>"><BR>
<input type=text name=fax value="<%= rs("fax") %>"><BR>
<input type=text name=email value="<%= rs("email") %>"><BR>
<input type=text name=hjemmeside value="<%= rs("hjemmeside") %>"><BR>
<input type=text name=brugernavn value="<%= rs("password") %>"><BR>
<INPUT TYPE="checkbox" NAME="tilbudsmail" <% If rs("tilbudsmail") = "true" THEN %>CHECKED<% End If %>>

<INPUT TYPE="checkbox" NAME="nyhedsmail" <% If rs("nyhedsmail") = "ja" Then %>CHECKED<% End If %>>