<%@LANGUAGE="VBSCRIPT"%>
<%
Response.Expires = 0
name=Request.Form ("name")
phone=request.form("phone")
email=Request.Form ("email")
addr=Request.Form("addr")
comm=Request.Form ("comm")
Body = "你好:" & chr(13)
Body = Body & "客户" & name & "来信" & chr(13)&vbcrlf
Body = Body & "   客户电话:" & phone & chr(13)&vbcrlf
Body = Body & "   电子信箱:" &email & chr(13)&vbcrlf
Body = Body & "   回邮地址:" & addr & chr(13)&vbcrlf&vbcrlf
Body = Body & "   意见/内容：" & comm & chr(13)

Set mail = Server.CreateObject("CDONTS.NewMail")
  mail.From=email
  mail.To = "yyynet@yeah.net"
  mail.Subject = "客户" & name & "来信"
  mail.Body = Body
  mail.Send
Set mail = Nothing
%>