支持html的
<%@LANGUAGE="VBSCRIPT" %>
mail<%
SET myMail=Server.CreateObject("CDONTS.Newmail")
HTML = ""
HTML = HTML & ""
HTML = HTML & "
"
HTML = HTML & "Title: A mail from www.dataframe.com
"
HTML = HTML & "Type: "&request.form("MessageType")&"
"
HTML = HTML & "Comment: "&request.form("Comments")&"
"
HTML = HTML & "Name: "&request.form("Username")&"
"
HTML = HTML & "E-mail: "&request.form("UserEmail")&"
"
HTML = HTML & "Tel: "&request.form("UserTel2")&"
"
HTML = HTML & "Fax: "&request.form("UserFAX")&"
"
HTML = HTML & "
"
HTML = HTML & ""
HTML = HTML & ""
myMail.From=request.form("UserEmail")
myMail.To="etzzy@hotmail.com"
myMail.Subject=request.form("MessageType")
myMail.BodyFormat=0
myMail.MailFormat=0
myMail.Body=HTML
myMail.Send
SET myMail=Nothing
%>