发布网友 发布时间:2022-05-01 11:23
共1个回答
热心网友 时间:2023-10-09 19:33
Dim JMail,email Set JMail = Server.CreateObject("JMail.Message") jmail.Charset = "GB2312" ''邮件文字的代码为简体中文 jmail.ContentType = "text/html" JMail.From = "" ' 发送者地址 JMail.FromName = "" ' 发送者姓名 JMail.Subject = " " ' 邮件主题 JMail.MailServerUserName = "邮箱名" ' 身份验证的用户名 JMail.MailServerPassword = "邮箱密码" ' 身份验证的密码 JMail.Priority = 3 JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR") JMail.Logging = true email="接受邮件地址" email1="接受邮件地址" JMail.AddRecipient(email1) JMail.AddRecipient(email) JMail.HTMLBody = 邮件内容 JMail.Body = 邮件内容 JMail.Send("stmp.163.com") JMail.Close() Set JMail = Nothing 记得要装 jmail组件就可以了