Ingen HTML coder tilladt!

Jeg fik dette smidt i hovedet:
server.htmlencode(string)

Men kan ikke se hvordan jeg skal få sat det ind i mon kode:

<%

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"adresse.mdb\")

\'SQLstmt = \"INSERT INTO adresse (navn,adresse,ID)\"
\'SQLstmt = SQLstmt & \" VALUES (\" & request.form(\"navn\") & \"\',\'\" & request.form(\"adresse\") & \"\',\'\" & request.form(\"ID\") & \"\')\"
SQLstmt = \"Select Top 100000000 * from adresse order by ID DESC\"
\'
\'response.write SQLstmt

Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)
  %>
<%
DO WHILE NOT rs.EOF
  ID = rs(\"ID\")
  navn = rs(\"navn\")
  adresse = rs(\"adresse\")
  dato = rs(\"dato\")
%>
<%=dato%> - <a href=\"vis_data_alt_top.asp?id=<%=ID%>\"><%=navn%></a>
<br>
<%
  rs.MoveNext
LOOP
RS.Close
Response.Write \"\"

conn.Close
Set conn = nothing
Set SQLstmt = nothing
%>


/4b4