jmail发邮件
经验与学习 2008/6/2 14:05:03 点击:不统计
关键词:jmail发邮件,jmail发邮件例子,jmail发邮件实例,设置jmail发邮件
On Error Resume Next
Set JMail=Server.CreateObject("JMail.Message")
If JMail Is Nothing Then
Response.Write "不支持"
Else
Response.Write "支持"
End If
Set JMail = Server.CreateObject("JMail.Message")
JMail.Charset = "gb2312"
JMail.From = "labcdef@163.com" 使用邮箱的账号@163.com
JMail.FromName = "网站制作学习网网友"
JMail.Subject = Emailtitle
JMail.MailServerUserName = "labcdef" 使用邮箱的账号
JMail.MailServerPassword = "*****"邮箱账号密码
JMail.Priority = 3
JMail.AddRecipient "###@yeah.net"收件人
JMail.Body = "内容"
JMail.Send("smtp.163.com")
JMail.Close()
·上一篇:Jmail组件下载 >> ·下一篇:Jmail不能发邮件 >>