<%
if len(trim(request.form("submit"))) > 0 then
strEmail = request.form("email")
if len(trim(strEmail)) > 0 and CheckEmail(strEmail) then
RegisterForNewsletter(strEmail)
session("Newsletter") = "1"
else
session("Newsletter") = ""
end if
end if
%>
<%if len(trim(session("Newsletter"))) = 0 then %>
<%else %>