AutoHotkey中有更好的登录方法吗?或者也许是一种允许不安全登录Google的方法?我在Google帐户设置上启用了安全性较低的应用。
AutoHotkey错误:
此邮件无法发送到SMTP服务器。传输错误codwe是0x80040217。服务器响应不可用。
Gmail回复(部分信息已修改):
登录尝试已被阻止
嗨 [编辑] ,
有人试图从不符合现代安全标准的应用中登录您的Google帐户 [编辑] @ gmail.com。
...
AutoHotkey脚本(部分信息已编辑):
pmsg := ComObjCreate("CDO.Message")
pmsg.From := """John Doe"" <John.Doe@gmail.com>"
pmsg.To := "Jane.Doe@gmail.com, Joe.Schmo@gmx.com"
pmsg.BCC := "" ; Blind Carbon Copy, Invisible for all, same syntax as CC
pmsg.CC := "redacted@gmail.com" ; Somebody@somewhere.com, Other-somebody@somewhere.com
pmsg.Subject := "See below"
;pmsg.TextBody := ""
pmsg.HtmlBody := "<html><head><title>Hello</title></head><body><table border='1'><tr><td>row 1, cell 1</td><td>row 1, cell 2</td></tr><tr><td>row 2, cell 1</td><td>row 2, cell 2</td></tr></table> </body></html>"
;sAttach := "" ; can add multiple attachments, the delimiter is |
fields := Object()
fields.smtpserver := "smtp.gmail.com" ; specify your SMTP server
fields.smtpserverport := 465 ; 25
fields.smtpusessl := True ; False
fields.sendusing := 2 ; cdoSendUsingPort
fields.smtpauthenticate := 1 ; cdoBasic
fields.sendusername := "redacted@gmail.com"
fields.sendpassword := "redacted"
fields.smtpconnectiontimeout := 60
schema := "http://schemas.microsoft.com/cdo/configuration/"
pfld := pmsg.Configuration.Fields
For field,value in fields
pfld.Item(schema . field) := value
pfld.Update()
Loop, Parse, sAttach, |, %A_Space%%A_Tab%
pmsg.AddAttachment(A_LoopField)
pmsg.Send()
return
答案 0 :(得分:0)
嗯,也许你需要在形成的架构字段周围引用:
pfld.Item("""" . schema . field . """") := value
或尝试'"'
获取报价。
另外,尝试使用@gmail部分的端口25和/或用户名(但我认为你的gmail是正确的。)
H个,