mail.asp

来自「上海购物网设计的购物系统是基于WEB开发的大型购物系统。 它以构建电子商务网」· ASP 代码 · 共 31 行

<%
  '参数说明
  'Subject     : 邮件标题
  'MailAddress : 发件服务器的地址,如smtp.163.com
  'ToEmail     : 收件人邮件地址
  'Sender      : 发件人姓名
  'Content     : 邮件内容
  'FromEmail   : 发件人邮件地址
  'Fromer      : 发件人姓名
  'UserName    : 发件邮件帐号
  'PassWord    : 发件邮件密码

  Sub SendAction(subject, mailaddress, Tomail, sender, content, fromEmail,Fromer,UserName,PassWord) 
    Set oJmail=Server.CreateObject("Jmail.Message")
    oJmail.Logging=false
    oJmail.Silent=True
    oJMail.Priority = 1
    oJmail.FromName=Fromer
    oJmail.From= FromEmail
    oJmail.CharSet="gb2312"
    oJmail.MailServerUserName = UserName
    oJmail.MailServerPassWord = PassWord
    oJmail.ContentTransferEncoding = "base64"
    oJMail.HTMLBody = content '邮件内容
    oJMail.Body ="我们的邮件采用了HTML格式，但是您的邮件查看软件可能不支持"
    oJmail.AddRecipient Tomail '收件人地址
    oJmail.Subject = subject '标题
    oJmail.Send(mailaddress)
  End Sub
  
%>