참 검색을 하면 오토핫키로 이메일 보내는 스크립트가 참 많은데요 그 중에
스크립트 하나를 다운받고 실행을 했는데 오류 하나도 안뜨고 Done 이라고는 뜨면서
결과가 메일이 안오는 문제가 있습니다. 대체 뭐가 문제일까요?
com.ahk include 했습니다.
========================= 스크립트 입니다 =========================
#Include,COM.ahk
;Source from : https://github.com/camerb/AHKs/blob/master/SendEmailSimpleLib.ahk
AutoTrim, On
sSubject = 하이용 ;이메일 제목
sAttach = C:\im\1.jpg ;첨부파일경로 및 파일명, 여러개이면 "|"로 구분해서 입력
sTo = 받는자 [email protected] ;받는 사람 이메일 주소
sReplyTo = [email protected] ;참조자 이메일 주소(?)
sBody = this is a test email ;메일 본문내용
sUsername = 제 지메일 id ;지메일 아이디
sPassword = 비번 ;지메일 패스워드
sFrom = 제 지메일 [email protected] ;보내는 사람 이메일 주소
sServer = smtp.gmail.com ;보내는 서버 주소
nPort = 25 ;보내는 서버 포트번호
bTLS = true ;TLS보안연결 허용여부 , true or false
nSend = 2 ;???
nAuth = 1 ;사용자인증 여부 1=인증, 0=인증안함.
SendTheFrigginEmail(sSubject, sAttach, sTo, sReplyTo, sBody, sUsername, sPassword, sFrom, sServer, nPort, bTLS, nSend, nAuth)
MsgBox,done
ExitApp
SendTheFrigginEmail(sSubject, sAttach, sTo, sReplyTo, sBody, sUsername, sPassword, sFrom, sServer, nPort, bTLS, nSend, nAuth)
{
if (sFrom == "")
sFrom := username . "@gmail.com"
if (sReplyTo == "")
sReplyTo := username . "@gmail.com"
COM_Init()
pmsg := COM_CreateObject("CDO.Message")
pcfg := COM_Invoke(pmsg, "Configuration")
pfld := COM_Invoke(pcfg, "Fields")
COM_Invoke(pfld, "Item", "http://schemas.microsoft.com/cdo/configuration/sendusing", nSend)
COM_Invoke(pfld, "Item", "http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout", 60)
COM_Invoke(pfld, "Item", "http://schemas.microsoft.com/cdo/configuration/smtpserver", sServer)
COM_Invoke(pfld, "Item", "http://schemas.microsoft.com/cdo/configuration/smtpserverport", nPort)
COM_Invoke(pfld, "Item", "http://schemas.microsoft.com/cdo/configuration/smtpusessl", bTLS)
COM_Invoke(pfld, "Item", "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", nAuth)
COM_Invoke(pfld, "Item", "http://schemas.microsoft.com/cdo/configuration/sendusername", sUsername)
COM_Invoke(pfld, "Item", "http://schemas.microsoft.com/cdo/configuration/sendpassword", sPassword)
COM_Invoke(pfld, "Update")
COM_Invoke(pmsg, "From", sFrom)
COM_Invoke(pmsg, "To", sTo)
COM_Invoke(pmsg, "ReplyTo", sReplyTo)
COM_Invoke(pmsg, "Subject", sSubject)
COM_Invoke(pmsg, "TextBody", sBody)
Loop, Parse, sAttach, |, %A_Space%%A_Tab%
COM_Invoke(pmsg, "AddAttachment", A_LoopField)
COM_Invoke(pmsg, "Send")
COM_Release(pfld)
COM_Release(pcfg)
COM_Release(pmsg)
COM_Term()
}
return
이렇게 했는데 안됩니다.. 실행하면 done 이라고 뜹니다
근데 메일이 안옵니다 답답하네요 뭐가 문제일까요
구문상 항상 done 라고 뜰거같네요.
nPort 와 bTLS 를 수정해보세요. 일단 포트를 465 나 587 로 수정해보고, 안되면 TLS를 false 로 하고 포트 변경해보세요.