Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- f1::
- pmsg := ComObjCreate("CDO.Message")
- pmsg.From := """StreamRight"" StreamRight@gmail.com" ;Youtube does not allow angled brackets so just add them at start and end of the email address (greater than and less than symbols)
- pmsg.To := "1112225555@vtext.com"
- pmsg.BCC := "" ; Blind Carbon Copy, Invisible for all, same syntax as CC
- pmsg.CC := ""
- pmsg.Subject := "---What A Deal---"
- pmsg.TextBody := "Would you like to buy something from me?"
- fields := Object()
- fields.smtpserver := "smtp.gmail.com" ; specify your SMTP server
- fields.smtpserverport := 465
- fields.smtpusessl := True
- fields.sendusing := 2
- fields.smtpauthenticate := 1
- fields.sendusername := "testman@here.com"
- fields.sendpassword := "abc123"
- fields.smtpconnectiontimeout := 60
- schema := "http://schemas.microsoft.com/cdo/conf...​"
- 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()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement