dim mailbody
mailbody = "内容"
Set jmail = Server.CreateObject("JMAIL.Message")
Jmail.Charset = "utf-8"
Jmail.ContentType = "text/html"
Jmail.Silent = true
JMail.MailServerUserName = "Webmaster@cuiz.net"'(这里换成您的SMTP验证帐号，也就是发信人的用户名)
JMail.MailServerPassword = "web123456" '（这里填写您的SMTP认证密码，也就是发信人的密码）
Jmail.From = "Webmaster@cuiz.net" '（发信人邮件地址）
Jmail.FromName = "辣辣箭" '（这里填写发信人的姓名）
JMail.AddRecipient "jian08@126.com" '（这里填写收信人的邮件地址）
Jmail.Subject = "测试JMail4.4发送邮件" '（这里填写邮件标题）
Jmail.body = mailbody '参数是信件正文
Jmail.Send("mail.cuiz.net") '(这里填写发件服务器需要与SMTP验证信息对应)
Jmail.Priority = 2 '(邮件优先级)
if err then
SendMail= err.description
err.clear
else
SendMail="成功发送!"
end if
JMail.Close()
Set Jmail=nothing