klickbar mailadress

Hej.
Jag har information som dyker upp i ett popupfönster då man klickar på en länk. Det är företagsinformation, så en del av länkarna såsom e-mail vill jag ha klickbara, just som mailadresser.

All data hämtas ur databas. Ex på kod: (inphl är en funktion)

ORIGINAL

            \<%=inphl("Kontaktperson")%\>
\<%=inptxt("Namn ", "KontaktpersonNamn", 100 )%\>
\<%=inptxt("Epost ", "KontaktpersonEmail", 100 )%\>
\<%=inptxt("Anknytning ", "KontaktpersonAnk", 100 )%\>
\<%=inptxt("Mobilnummer", "KontaktpersonMobil", 100 )%\>

' TILL DETTA:

<%=inphl("Kontaktperson")%>
<%=inptxt("Namn ", "KontaktpersonNamn", 100 )%>
<% if (rs("KontaktpersonEmail").value <> "1" or isNull(rs("KontaktpersonEmail").value)) and rs("KontaktpersonEmail").value <> "" then
Response.Write("<tr><td nowrap>E-post</td><td><a href="mailto:<% Response.Write(RS("KontaktpersonEmail") %>"><% Response.Write(RS("KontaktpersonEmail") %></a></td></tr>")
end if%>
<%=inptxt("Anknytning ", "KontaktpersonAnk", 100 )%>
<%=inptxt("Mobilnummer", "KontaktpersonMobil", 100 )%>

Detta blir dock bara fel. Några tips? :birp