GMAIL邮箱 SMTP 发邮件问题。
现在GMail邮箱不能用Jmail组件,请问如何解决这样的问题?代码如下:
dim jmail
set jmail=server.CreateObject ("jmail.message")
jmail.Silent =true
jmail.logging = true
jmail.Charset ="utf-8"
jmail.ContentType = "text/html"
jmail.ContentTransferEncoding = "base64"
jmail.Encoding = "base64"
jmail.ISOEncodeHeaders = false
jmail.AddRecipient "*******@,"李生" '收件人郵箱
jmail.From =="*******@' 發信郵箱
jmail.FromName ="huade" '發信人名稱
jmail.Subject ="hi,jim" '發信主題
jmail.Body="How are you" '發信內容
jmail.MailServerUserName ="*******@'用户名称
jmail.MailServerPassWord ="*******" '用户密码
jmail.Priority = 1
isgoA = jmail.Send(smtpserver)
if isgoA then
msg="发送成功!"
else
msg="邮件发送失败!"
end if
jmail.Close
set jmail=nothing
发邮件的服务器是Gmail,请问谁用过gmail发信的,帮忙一下。
[ 本帖最后由 huade 于 2010-12-9 10:18 编辑 ]