jmail的一个身份验证问题

最新推荐文章于 2021-07-30 03:07:08 发布

chinaPhoneLab

最新推荐文章于 2021-07-30 03:07:08 发布

阅读量8.2k

点赞数

分类专栏： asp 文章标签： email 服务器测试 html

asp 专栏收录该内容

6 篇文章

订阅专栏

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

Sub SendAction(subject,mailaddress,email,sender,content,fromer)

   Dim JMail,contentId
   Set JMail = Server.CreateObject("JMail.Message")
   jmail.silent = true '屏蔽例外错误，返回FALSE跟TRUE两值
            jmail.logging = true '启用邮件日志
   JMail.Charset = "gb2312" ' 邮件字符集，默认为"US-ASCII"
   ' JMail.ISOEncodeHeaders = False ' 是否进行ISO编码，默认为True

   ' 发送者信息（可用变量方式赋值）
   JMail.From = fromer ' 发送者地址
   JMail.FromName = sender ' 发送者姓名
   JMail.Subject = subject ' 邮件主题

   ' 身份验证
   JMail.contentType = "text/html"
   JMail.MailServerUserName = "info@zhuangwang.com" '身份验证的用户名
   JMail.MailServerPassword = "*****" ' 身份验证的密码

   ' 设置优先级，范围从1到5，越大的优先级越高，3为普通
   JMail.Priority = 3

   JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")

   ' 加入一个收件人【变量email：收件人地址】可以同一语句重复加入多个
   FriendEmail=email '接收人邮件地址
   JMail.AddRecipient(FriendEmail)

   ' 加入附件【变量filename：附件文件的绝对地址，确保用户IUSR_机器名有访问的权限】
   ' 【参数设置是(True)否(False)为Inline方式】
   'contentId = JMail.AddAttachment (Server.MapPath("jmail.asp"), True)

   ' 邮件主体（HTML(注意信件内链接附件的方式)）
   MailBody = MailBody & "<html><head><META content=zh-cn http-equiv=Content-Language><meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312""><style type=text/css>BODY {FONT-SIZE: 9pt}</style></head><body>"
   MailBody = MailBody & content
   MailBody = MailBody & "</body></html>"
   'JMail.HTMLBody ="<a href='www.zhuangwang.com'>JMail组件发送测试成功！</a/>"

   ' 邮件主体（文本部分）
   JMail.Body = content

   ' 发送【调用格式：objJMail.Send([username:password@]SMTPServerAddress[:Port])】
   ' 发送邮件的服务器
   JMail.Send(mailaddress)

   ' 关闭并清除对象
   JMail.Close()
   Set JMail = Nothing
End Sub

'调用此Sub的例子
Dim strSubject,strEmail,strMailAdress,strSender,strContent,strFromer
strSubject         = "妆网-您已成功提交肌肤档案中秋佳节"
strContent        = "<a href=""http://www.zhuangwang.com"">JMail组件发1111111送测试成功！</a><img src=""http://mimg.126.com/logo/126logo_tsp.gif"" width=""20"" height=""23"">" '邮件主内容
strEmail            = "" '要发送的邮箱地址 525520513@qq.com
strFromer          = "info@zhuangwang.com" '作者邮箱地址 lonelyglone@126.com
strMailAddress = "smtp.c2.corpease.net" '作者邮箱服务器 smtp.126.com
strSender         = "妆网-www.zhuangwang.com"

Call SendAction (strSubject,strMailaddress,strEmail,strSender,strContent,strFromer)
%>

-----------------------------------------------------//

上面代码网上到去都有，这里需要注意的是一个身份验证问题

我曾试过用126的服务器smtp.126.com，发送信件，用 JMail.MailServerUserName = "用户名" '身份验证的用户名可以发送，但是用我们公司自己的企业邮箱，比如用这里的 JMail.MailServerUserName = "info" '身份验证的用户名就会发生错误，因为我们公司的企业邮局不是单独的，是买的专门的企业邮局公司，在这种共享类型企业邮局里面就需要带全称 JMail.MailServerUserName = "info@zhuangwang.com" '身份验证的用户名