换下面这段试试看吧`~~
当然把帐号密码填上,还有确保你的Mail服务器能够发送`~~
on error resume next
dim JMail
Set JMail = Server.CreateObject("JMail.Message")
'JMail.silent = true
JMail.Logging = True
JMail.Charset = "gb2312"
JMail.ContentType = "text/html"
JMail.From = "chenshouhu@tea600.com"
JMail.FromName = "发信人"
JMail.MailServerUserName = "邮箱帐号"
JMail.MailServerPassword = "邮箱密码"
JMail.Priority = 1
JMail.AddRecipient "pengpeng-410@163.com"
JMail.Subject = "html格式的邮件"
JMail.Body = "你好,谢谢你访问我们的网站" &yourHost
'JMail.AddHeader "Originating-IP", GBL_IPAddress
JMail.Send("mail.tea600.com")
Set JMail = nothing
If err then Response.write "发送错误"
VB里的语法不同于ASP网页代码,你这写法错了。VB中不是用server来创建对象的。参考:Set
j=
CreateObject("jmail.Message")
前提是Jmail组件的DLL文件已经安装到系统中了。
欢迎分享,转载请注明来源:夏雨云
评论列表(0条)