zjw201314 发表于 2011-8-14 08:37:44

我测试 没通过! 支持一下!

zldfsz 发表于 2011-11-27 11:56:39

太强大了,支持{:face (411):}

loveauto 发表于 2012-10-26 10:53:08

经测试 可以用 呵呵

shuaiw 发表于 2013-3-25 17:52:12

为什么我测试也没有通过啊

h20040606 发表于 2013-3-25 19:55:13

可以采用JMAIL
;~ =================================================
;~ 函数名:JmailSend
;~ 作 用:用Jmail发送邮件
;~ 参 数:Subject 邮件标题
;~ Body 邮件内容
;~ isHtml 是否发送Html格式邮件 (True 是)
;~ HtmlBody Html格式邮件内容
;~ MailTo 收件人Email
;注意:From,MailServerUserName,.MailServerPassWord,Send 必须匹配
;~ From 发件人Email
;~ FromName 发件人姓名
;~ Smtp smtp服务器
;~ Username 邮箱用户名
;~ Password 邮箱密码
;~isCheck 服务器是否需验证用户,缺省需要
;~$Receipt 是否接收回执,默认需要
;~需要先注册jmail.dllRunWait(@ComSpec & " /c " & 'regsvr32 jmail.dll /s', "", @SW_HIDE)
;~ =================================================
Func _JmailSend($subject, $Body, $isHtml, $HtmlBody, $MailTo, $From, $FromName, $attachment, $Smtp, $username, $Password, $isCheck = True)

h20040606 发表于 2013-3-25 19:56:35

Func _JmailSend($subject, $Body, $isHtml, $HtmlBody, $MailTo, $From, $FromName, $attachment, $Smtp, $username, $Password, $isCheck = True)
        $msg = ObjCreate("jmail.Message")
        $msg.MailServerUserName = $username
        $msg.MailServerPassWord = $Password
        $msg.AddRecipient($MailTo)
        $msg.From = $From
        $msg.Fromname = $FromName
        $msg.Charset = "gb2312"
        $msg.Logging = True
        $msg.Silent = True
        $msg.ReturnReceipt = True
        $msg.Subject = $subject
        $msg.Body = $Body
        If $attachment <> "" And FileExists($attachment) = 1 Then
                $msg.AddAttachment($attachment)
        EndIf
        If $isHtml = True Then $msg.Htmlbody = $HtmlBody
        If $isCheck = True Then
                $msg.Send($username & ":" & $Password & "@" & $Smtp)
        Else
                $msg.Send($Smtp)
        EndIf
        $msg.Close
        $msg = 0
EndFunc

heruowen 发表于 2014-1-16 11:31:44

测试没成功,继续研究

diandiand163 发表于 2014-8-9 17:08:58

确实不错。辛苦了。

qwe4919705 发表于 2014-8-19 11:13:52

不能用啊 要不是提示服务器链接失败 要么就是服务器未响应

hnfeng 发表于 2014-9-17 21:07:56

谢谢分享谢谢分享

bernise 发表于 2014-12-30 11:20:48

这个支持中文的吗?

applegarden 发表于 2015-4-30 12:49:13

谢谢,好东西,163不能通过验证,QQ邮箱可以

Huiseyu 发表于 2015-4-30 13:22:36

未作多的测试
163.com 和qq.com均发送成功,收到中英文不乱码.谢谢楼主纠正后分享。

lianhc 发表于 2015-5-9 09:02:58

这两天163不能用了

redapple2008 发表于 2018-8-6 10:43:42

我也测试未通过,有人知道原因吗?
页: 1 [2]
查看完整版本: 用AU3如何通过163的SMTP发邮件?