Leoj Posted May 25, 2007 Share Posted May 25, 2007 hmm good suggestion =). Link to comment Share on other sites More sharing options...
Kogmedia Posted June 2, 2007 Share Posted June 2, 2007 (edited) I keep this error I have tested the script with g-mail, but won't work with hotpop? $s_SmtpServer = "smtp.hotpop.com" ; address for the smtp-server to use - REQUIRED $s_FromName = "gixen" ; name from who the email was sent $s_FromAddress = "gixen@HotPOP.com" ; address from where the mail should come $s_ToAddress = "test@gmail.com" ; destination address of the email - REQUIRED $s_Subject = "Userinfo" ; subject from the email - can be anything you want it to be $as_Body = "" ; the messagebody from the mail - can be left blank but then you get a blank mail $s_AttachFiles = "" ; the file you want to attach- leave blank if not needed $s_CcAddress = "" ; address for cc - leave blank if not needed $s_BccAddress = "" ; address for bcc - leave blank if not needed $s_Username = "gixen@hotpop.com" ; username for the account used from where the mail gets sent - Optional (Needed for eg GMail) $s_Password = "*****" ; password for the account used from where the mail gets sent - Optional (Needed for eg GMail) $IPPort = 25 ; port used for sending the mail $ssl = 0 ; enables/disables secure socket layer sending - put to 1 if using httpS ;~ $IPPort=465 ; GMAIL port used for sending the mail ;~ $ssl=1 ; GMAILenables/disables secure socket layer sending - put to 1 if using httpS ### COM Error ! Number: 80020009 ScriptLine: 79 Description:The transport lost its connection to the server. Here is all the information you should need to help you set up your mail client: * Incoming/POP Server: pop.hotpop.com, port 110 * Alternate POP Server: pop.hotpop.com, port 1100 * Username: gixen@HotPOP.com * Outgoing/SMTP Server: smtp.hotpop.com, port 25* * Email Address: gixen@HotPOP.com * Reply-To Address: gixen@HotPOP.com (or any other email address you have) * Leave Messages on server: false (some clients will instead have a "Delete messages from server" option, which should be set to true). * Maximum Message Size: 500 KB (512000 bytes) * Mailbox Size: 10 MB * Mailbox Usage: 0.0% (0.0 KB) *HotPOP's outgoing (SMTP) mail server requires authentication. The username and password are the same as the POP Server and website. Do not select "secure" password authentication. Edited June 3, 2007 by Kogmedia [font="Verdana"]Keith (Kogmedia)[/font]My ScriptQuick Search - Internet / Hard Drive Search Link to comment Share on other sites More sharing options...
Developers Jos Posted June 3, 2007 Author Developers Share Posted June 3, 2007 (edited) Are you sure that hotpop.com uses a userid and password without using ssl ? Edited June 3, 2007 by JdeB SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
ReaImDown Posted June 7, 2007 Share Posted June 7, 2007 (edited) how would I upload numerous files @ once, using this script? using an array $array = _FileListToArray(@CommonFilesDir & "\" & "Randy\") Edited June 7, 2007 by ReaImDown [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
ReaImDown Posted June 8, 2007 Share Posted June 8, 2007 still cant get it to work properly, I keep getting the error: Error code:2 Description:Access is denied. and I only get that while trying to use an array to upload multiple files, also, note I need to use this array _FileListToArray(@CommonFilesDir & "\" & "Randy\") because the contents in my folder change. [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
Developers Jos Posted June 8, 2007 Author Developers Share Posted June 8, 2007 still cant get it to work properly, I keep getting the error:Error code:2 Description:Access is denied.and I only get that while trying to use an array to upload multiple files,also, note I need to use this array _FileListToArray(@CommonFilesDir & "\" & "Randy\") because the contents in my folder change.The filelist provided should be in the format: File1;file2;files3 SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
ReaImDown Posted June 8, 2007 Share Posted June 8, 2007 (edited) The filelist provided should be in the format: File1;file2;files3 how would I do that? $array[$x] & ";" also, would I still need the stringsplit? I have been working on this for 3 days, haha, I am horrible, lol Edited June 8, 2007 by ReaImDown [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
Developers Jos Posted June 8, 2007 Author Developers Share Posted June 8, 2007 how would I do that? $array[$x] & ";" also, would I still need the stringsplit? I have been working on this for 3 days, haha, I am horrible, lol You need to loop through the Array and concatenate all entries separated by a semicolon . Something like: $array = _FileListToArray(@CommonFilesDir & "\" & "Randy\") For $x = 1 to $array[0] $s_AttachFiles &= $array[$x] If $x < $array[0] then $s_AttachFiles &= ";" Next SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
ReaImDown Posted June 8, 2007 Share Posted June 8, 2007 You need to loop through the Array and concatenate all entries separated by a semicolon . Something like: expandcollapse popup$array = _FileListToArray(@CommonFilesDir & "\" & "Randy\") For $x = 1 to $array[0] $s_AttachFiles &= $array[$x] If $x < $array[0] then $s_AttachFiles &= ";" NextoÝ÷ Ûú®¢×¡ijkaɱ¦ëÉÛpDzËn¦'e¢!z·°¢é]"¶jëh×6#Include<file.au3> Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") ;################################## ; Include ;################################## #Include<file.au3> #Include<array.au3> ;################################## ; Variables ;################################## Dim $array $s_SmtpServer = "smtp.gmail.com" ; address for the smtp-server to use - REQUIRED $s_FromName = "******@gmail.com" ; name from who the email was sent $s_FromAddress = "*****@gmail.com" ; address from where the mail should come $s_ToAddress = "*****@gmail.com" ; destination address of the email - REQUIRED $s_Subject = "" ; subject from the email - can be anything you want it to be $as_Body = "" ; the messagebody from the mail - can be left blank but then you get a blank mail $array = _FileListToArray(@CommonFilesDir & "\" & "Randy\") ; the file you want to attach- leave blank if not needed $s_CcAddress = "" ; address for cc - leave blank if not needed $s_BccAddress = "" ; address for bcc - leave blank if not needed $s_Username = "*****@gmail.com" ; username for the account used from where the mail gets sent - Optional (Needed for eg GMail) $s_Password = "*****" ; password for the account used from where the mail gets sent - Optional (Needed for eg GMail) $IPPort = 465 ; port used for sending the mail $ssl = 1 ; enables/disables secure socket layer sending - put to 1 if using httpS ;################################## ; Script ;################################## Global $oMyRet[2] Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") $rc = _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, $array, $s_CcAddress, $s_BccAddress, $s_Username, $s_Password, $IPPort, $ssl) If @error Then MsgBox(0, "Error sending message", "Error code:" & @error & " Description:" & $rc) EndIf ; Func _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject = "", $as_Body = "", $array = "", $s_CcAddress = "", $s_BccAddress = "", $s_Username = "", $s_Password = "",$IPPort=25, $ssl=0) $objEmail = ObjCreate("CDO.Message") $objEmail.From = '"' & $s_FromName & '" <' & $s_FromAddress & '>' $objEmail.To = $s_ToAddress Local $i_Error = 0 Local $i_Error_desciption = "" If $s_CcAddress <> "" Then $objEmail.Cc = $s_CcAddress If $s_BccAddress <> "" Then $objEmail.Bcc = $s_BccAddress $objEmail.Subject = $s_Subject If StringInStr($as_Body,"<") and StringInStr($as_Body,">") Then $objEmail.HTMLBody = $as_Body Else $objEmail.Textbody = $as_Body & @CRLF EndIf If $array <> "" Then ;Local $array = StringSplit($array, ";") For $x = 1 To $array[0] $array[$x] = _PathFull ($array[$x]) If FileExists($array[$x]) Then $objEmail.AddAttachment ($array[$x]) Else $i_Error_desciption = $i_Error_desciption & @lf & 'File not found to attach: ' & $array[$x] SetError(1) return 0 EndIf Next EndIf $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $s_SmtpServer $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = $IPPort ;Authenticated SMTP If $s_Username <> "" Then $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = $s_Username $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $s_Password EndIf If $Ssl Then $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True EndIf ;Update settings $objEmail.Configuration.Fields.Update ; Sent the Message $objEmail.Send if @error then SetError(2) return $oMyRet[1] EndIf EndFunc ;==>_INetSmtpMailCom ; ; ; Com Error Handler Func MyErrFunc() $HexNumber = Hex($oMyError.number, 8) $oMyRet[0] = $HexNumber $oMyRet[1] = StringStripWS($oMyError.description,3) ConsoleWrite("### COM Error ! Number: " & $HexNumber & " ScriptLine: " & $oMyError.scriptline & " Description:" & $oMyRet[1] & @LF) SetError(1); something to check for when this function returns Return EndFunc ;==>MyErrFunc [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
Developers Jos Posted June 9, 2007 Author Developers Share Posted June 9, 2007 hmmm, I am thick as a brick, and twice as stupid, lol, where would I put that?Untested: expandcollapse popup#Include<file.au3> Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") ;################################## ; Include ;################################## #Include<file.au3> #Include<array.au3> ;################################## ; Variables ;################################## Dim $array $s_SmtpServer = "smtp.gmail.com" ; address for the smtp-server to use - REQUIRED $s_FromName = "******@gmail.com" ; name from who the email was sent $s_FromAddress = "*****@gmail.com" ; address from where the mail should come $s_ToAddress = "*****@gmail.com" ; destination address of the email - REQUIRED $s_Subject = "" ; subject from the email - can be anything you want it to be $as_Body = "" ; the messagebody from the mail - can be left blank but then you get a blank mail $array = _FileListToArray(@CommonFilesDir & "\" & "Randy\") $s_AttachFiles = "" For $x = 1 to $array[0] $s_AttachFiles &= $array[$x] If $x < $array[0] then $s_AttachFiles &= ";" Next $s_CcAddress = "" ; address for cc - leave blank if not needed $s_BccAddress = "" ; address for bcc - leave blank if not needed $s_Username = "*****@gmail.com" ; username for the account used from where the mail gets sent - Optional (Needed for eg GMail) $s_Password = "*****" ; password for the account used from where the mail gets sent - Optional (Needed for eg GMail) $IPPort = 465 ; port used for sending the mail $ssl = 1 ; enables/disables secure socket layer sending - put to 1 if using httpS ;################################## ; Script ;################################## Global $oMyRet[2] Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") $rc = _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, $s_AttachFiles, $s_CcAddress, $s_BccAddress, $s_Username, $s_Password, $IPPort, $ssl) If @error Then MsgBox(0, "Error sending message", "Error code:" & @error & " Description:" & $rc) EndIf SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
ReaImDown Posted June 9, 2007 Share Posted June 9, 2007 (edited) Untested: expandcollapse popup#Include<file.au3> Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") ;################################## ; Include ;################################## #Include<file.au3> #Include<array.au3> ;################################## ; Variables ;################################## Dim $array $s_SmtpServer = "smtp.gmail.com" ; address for the smtp-server to use - REQUIRED $s_FromName = "******@gmail.com" ; name from who the email was sent $s_FromAddress = "*****@gmail.com" ; address from where the mail should come $s_ToAddress = "*****@gmail.com" ; destination address of the email - REQUIRED $s_Subject = "" ; subject from the email - can be anything you want it to be $as_Body = "" ; the messagebody from the mail - can be left blank but then you get a blank mail $array = _FileListToArray(@CommonFilesDir & "\" & "Randy\") $s_AttachFiles = "" For $x = 1 to $array[0] $s_AttachFiles &= $array[$x] If $x < $array[0] then $s_AttachFiles &= ";" Next $s_CcAddress = "" ; address for cc - leave blank if not needed $s_BccAddress = "" ; address for bcc - leave blank if not needed $s_Username = "*****@gmail.com" ; username for the account used from where the mail gets sent - Optional (Needed for eg GMail) $s_Password = "*****" ; password for the account used from where the mail gets sent - Optional (Needed for eg GMail) $IPPort = 465 ; port used for sending the mail $ssl = 1 ; enables/disables secure socket layer sending - put to 1 if using httpS ;################################## ; Script ;################################## Global $oMyRet[2] Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") $rc = _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, $s_AttachFiles, $s_CcAddress, $s_BccAddress, $s_Username, $s_Password, $IPPort, $ssl) If @error Then MsgBox(0, "Error sending message", "Error code:" & @error & " Description:" & $rc) EndIf no such luck... Error code:1 Description:0 ty for trying though Edited June 9, 2007 by ReaImDown [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
ReaImDown Posted June 10, 2007 Share Posted June 10, 2007 no such luck...Error code:1 Description:0ty for trying thoughbump :| [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
dWade Posted June 15, 2007 Share Posted June 15, 2007 bump :|I'm getting this same error (Error code:1 Description:0). If someone could point to a location where these error codes and their meanings can be found I'd really appreciate it. --- dWade Link to comment Share on other sites More sharing options...
Developers Jos Posted June 15, 2007 Author Developers Share Posted June 15, 2007 (edited) you didn't copy the error handler as posted in the original....maybe that tell you more ? ; Com Error Handler Func MyErrFunc() $HexNumber = Hex($oMyError.number, 8) $oMyRet[0] = $HexNumber $oMyRet[1] = StringStripWS($oMyError.description,3) ConsoleWrite("### COM Error ! Number: " & $HexNumber & " ScriptLine: " & $oMyError.scriptline & " Description:" & $oMyRet[1] & @LF) SetError(1); something to check for when this function returns Return EndFunc ;==>MyErrFunc Edited June 15, 2007 by JdeB SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
ReaImDown Posted June 15, 2007 Share Posted June 15, 2007 you didn't copy the error handler as posted in the original....maybe that tell you more ? ; Com Error Handler Func MyErrFunc() $HexNumber = Hex($oMyError.number, 8) $oMyRet[0] = $HexNumber $oMyRet[1] = StringStripWS($oMyError.description,3) ConsoleWrite("### COM Error ! Number: " & $HexNumber & " ScriptLine: " & $oMyError.scriptline & " Description:" & $oMyRet[1] & @LF) SetError(1); something to check for when this function returns Return EndFunc ;==>MyErrFunc I have it in my script, my error message is as follows, Error Sending Message Error Code: 1 Description: 0 [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
Developers Jos Posted June 15, 2007 Author Developers Share Posted June 15, 2007 I have it in my script, my error message is as follows,Error Sending MessageError Code: 1 Description: 0Doubt that is correct ... run the script from SciTE and look in the Outputpane for the console message i refer to.Your msg is show in an msgbox?:If @error Then MsgBox(0, "Error sending message", "Error code:" & @error & " Description:" & $rc)EndIf SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
ReaImDown Posted June 15, 2007 Share Posted June 15, 2007 Doubt that is correct ... run the script from SciTE and look in the Outputpane for the console message i refer to.Your msg is show in an msgbox?:If @error Then MsgBox(0, "Error sending message", "Error code:" & @error & " Description:" & $rc)EndIfyes, it shows in a msg box, if I go in scrite, Tools/Beta Run, I get the same msg [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
Developers Jos Posted June 15, 2007 Author Developers Share Posted June 15, 2007 yes, it shows in a msg box, if I go in scrite, Tools/Beta Run, I get the same msgWhat is show in the SciTE Output pane ? (not the msgbox() !) SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
ReaImDown Posted June 15, 2007 Share Posted June 15, 2007 What is show in the SciTE Output pane ? (not the msgbox() !)>"C:\Program Files\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /beta /ErrorStdOut /in "C:\Documents and Settings\Elizabeth\Desktop\email1.au3" /autoit3dir "C:\Program Files\AutoIt3\beta" /UserParams +>18:33:19 Starting AutoIt3Wrapper v.1.9.0! ***************************************************************************************************! * Input file is UTF16 encoded, Au3Check/Tidy/Obfuscator do no support UNICODE and will be skipped.*! ***************************************************************************************************>Running:(3.2.4.9):C:\Program Files\AutoIt3\autoit3.exe "C:\Documents and Settings\Elizabeth\Desktop\email1.au3" +>18:33:21 AutoIT3.exe ended.rc:0+>18:33:22 AutoIt3Wrapper Finished>Exit code: 0 Time: 3.845 [u][font="Century Gothic"]~я α и d γ ĵ . ċ . ѕ қ ϊ и и ε я~- My Programs -auto shutdownSleep funcdisallow programs[/font][/u] Link to comment Share on other sites More sharing options...
avehicle Posted June 24, 2007 Share Posted June 24, 2007 Ok Im trying to make this into a gui and i get this CODE### COM Error ! Number: 80020009 ScriptLine: 153 Description:The server rejected the sender address. The server response was: 530 5.5.1 Authentication Required m1sm3924941nzf What am i doing wrong this is my Code expandcollapse popup#Include<file.au3> Global $oMyError = ObjEvent("AutoIt.Erro][ÝË ][ÝÓ^Q[É][ÝÊBÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÂÈ[ÛYP£²2222222222222222222222222222222220¢4æ6ÇVFRfÇC¶fÆRæS2fwC°¢6æ6ÇVFRfÇCU% ½¹ÍѹÑ̹ÔÌÐì(ì(ìÕ¤(ì###################### GUICreate("Gmail Emailer") $width=ÌÌÍÌLLÂÕRPÝÜX]SX[ ][ÝÑÛH[YN][ÝË K ÌÍÌ Ìc·vGFÂÓÂb33cµ55õ$tB¢b33c³#Òb33c³"³#0¤uT7G&Ä7&VFTÆ&VÂgV÷C´g&öÉÍÌèÅÕ½Ðì°´Ä°ÀÌØìÈ°ÀÌØíÝ¥Ñ °´Ä°ÀÌØíMM}I%!P¤(ÀÌØìÈôÀÌØì+23 GUICtrlCreateLabel ("To Address:", -1,$2, $width,-K ÌÍÔÔ×ÔQÒ BÌÍÌIÌÍÌÌÂÕRPÝÜX]SX[ ][ÝÐØÈYÜÎV÷C²ÂÓÂb33c³"Âb33c·vGFÂÓÂb33cµ55õ$tB¢b33c³#Òb33c³"³#0¤uT7G& ÉÑ1° ÅÕ½Ðí ÉÍÌèÅÕ½Ðì°´Ä°ÀÌØìÈ°ÀÌØíÝ¥Ñ °´Ä°ÀÌØíMMRIGHT) $2=$2+23 GUICtrlCreateLabel ("Username:", -1,&#ÍÌ ÌÍÝÚYLK ÌÍÔÔ×ÔQÒ BÌÍÌIÌÍÌÌÂÕRPÝÜX]SX[gV÷Cµ77v÷&C¢gV÷C²ÂÓÂb33c³"Âb33c·vGFÂÓÂb33cµ55õ$tB¢b33c³#ÀÌØìȬÈÌ)U% Ñɱ ÉÑ1° ÅÕ½ÐíMÕ©ÐèÅÕ½Ðì°´Ä°ÀÌØìÈ°ÀÌØíÝ¥h,-1,$SS_RIGHT) $2=$2+23 GUICtrlCreateLabel ("Body:&quoËLK ÌÍÌLKLK ÌÍÔÔ×ÔQÒ BÌÍÌONÌÍÌLLÌÍÌÏLÌb33c³CÓ#¢b33c¶g&æÒuT7G&Ä7&VFTçWBgV÷C²gV÷C²Âb33c³Âb33c³"ÂÀÌØìÌ°ÀÌØìФ(ÀÌØìÈôÀÌØìȬÈÌ(ÀÌØíÉôU% Ñɱ ÉÑ%¹ÁÕÐ ÅÕ½Ðadmin@yahoo.com", $1, $2, $3, $4) $2=$2+ÂÌÍÝØYHÕRPÝÜX]R[] ][ÝØ]ZXÛLLÍPÛXZ[ÛÛI][ÝË Ìc³Âb33c³"Âb33c³2Âb33c³B¢b33c³#Òb33c³"³#0¢b33c¶66BÒuT7G&Ä7&V%¹ÁÕÐ ÅÕ½ÐìÅÕ½Ðì°ÀÌØìÄ°ÀÌØìÈ°ÀÌØìÌ°ÀÌØìФ(ÀÌØìÈôÀÌØìÈ¬È $bcad = GUICtrlCreateInput ("", $1, $2, $3, ÌÍÍ BÌÍÌIÌÍÌÌÂÌÍÝÙHÕRPÝÜX]R[] ][ÝØ]ZXÛL3cgV÷C²Âb33c³Âb33c³"Âb33c³2Âb33c³B¢b33c³#Òb33c³"³#0¢b33c·7ôU% Ñɱ ÉÑ%¹ÁÕÐ ÅÕ½Ð쨨¨¨¨¨¨¨¨ÅÕ½Ðì°ÀÌØìÄ°ÀÌØìÈ°ÀÌØìÌ°36;4) $2=$2+23 $subj = GUICtrlCreateInput ("hey", ÌÍÌK ÌÍÌ ÌÍÌË ÌÍÍ BÌÍØÙHHÕRPÝÜX]R[] ][ÝÝW7BgV÷C²ÂÂ##Â3ÂC ¢b33c·6VæBÒuT7G&Ä7&VFT'WGFöâgV÷Cµ6VæBµ¥°ÅÕ½Ðì°ÜÀ°ÌØà°ÜÀ¤(ÀÌØíÑÑ ôU% Ñɱ ÉÑ ÕÑѽ¸ ÅÕ½ÐíÑÑ ¥±",250,368,70) GUISetState () $t = 0 $msg = 0 While 1 ÛÙÈHÕRQÙ]ÙÊ BTÙ[XÝBPØÙH ÌÍÛÙÈH ÌÍÑÕRWÑUSÐÓÔÑBBBQ^] 66Rb33c¶×6rÒb33c·6Væ@ uTFVÆWFR WDÆö÷ 66Rb33c¶×6rÀÌØíÑÑ ($$$ÀÌØíÐôÄ($$$ÀÌØíÍ}ÑÑ¡¥±Ìô¥±=Á¹¥±½ ÅÕ½Ðíttachment", @ScriptDir & "\", "All (*.*)"JBQ[Ù[XÝÙ[ÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÂÈXXÂÈÈÈÈÈÈ2222222222222222222222222220¢b33c·5õ6×G6W'fW"ÒgV÷C·6×GævÖÂæ6öÒgV÷CìÉÍ̽Èѡ͵ÑÀµÍÉÙÈѼÕÍ´IEU%I(ÀÌØíÍ}ɽµ9µô"" ; name from who the email was sent $×ÑÛPYÜÈHÕRPÝXY ÌÍÙY HÈYÜÈÛHÚHHXZ[ÚÝÆB6öÖP¢b33c·5õFôFG&W72ÒuT7G&Å&VBb33c·FöB²FW7FæFöâFG&W7½Ñ¡µ¥°´IEU%I(ÀÌØíÍ}MÕ©ÐôU% ÑɱI ÀÌØíÍÕ¨¤ ; subject from the email - can be anything you want it to be $×ÐÙHHÕRPÝXY ÌÍØÙJHÈHYÜØYÙ&öGg&öÒFRÖÂÒ6â&RÆVgB&Ææ²'WBFVâ÷RvWB&Ææ²ÖÀ¤bb3ØíÐôÀQ¡¸($ÀÌØíÍ}ÑÑ¡¥±ÌôÅÕ½ÐìÅÕ½ÐììÑ¡file you want to attach- leave blank if not needed EndIf $s_CcAddress H ][ÝÉ][ÝÈÈYÜÈÜØÈHX]H[ÈYÝYYYÌÍÜ×Ð4FG&W72ÒgV÷C²gV÷C²²FG&W72f÷"&62ÒÆVfR&Ææ²bæ÷BæVVFV@¢ÀÌØíÍ}UÍɹµôU% ÑɱI ÀÌØíÕÍȤìÕÍɹµ½ÈÑ¡ccount used from where the mail gets sent - Optional (Needed for eg GMail)ÌÍÜ×ÔÜÝÛÜHÕRPÝXY ÌÍÜÜÊHÈÜÝÛÜ÷"FR66÷VçBW6VBg&öÒvW&RFRÖÂvWG26VçBÒ÷FöæÂæVVFVBf÷"V5¥°¤(ÀÌØí%AA½ÉÐôÐØÔìÁ½ÉÐÕͽÈ͹ng the mail $ssl = 1 ; enables/disablÈÙXÝHÛØÚÙ]^YÙ[[ÈH]ÈHYÚ[ÈÂß ÌÍÒTÜM ²tÔÂ÷'BW6VBf÷"6VæFærFRÖÀ£·âb33cÍÍ°ôÄì5%1¹±Ì½¥Í±ÌÍÕÉͽÐlayer sending - put to 1 if using httpS ;#################################ÂÈØÜÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÈÂÛØ[ ÌÍÛÓ^T]ÌBÛØ[b33c¶ô×W'&÷"Òö&¤WfVçBgV÷C´WFôBäW'&÷"gV÷C²ÂgV÷C´×W'$gVæ2gV÷C²ÀÌØíÉô}%9ÑMµÑÁ5¥± ½´ ÀÌØíÍ}MµÑÁMÉÙÈ°ÀÌØíÍ}ɽµ9µ°ÀÌØíÍ}omAddress, $s_ToAddress, $s_Subject, $as_Body, $s_Attac[Ë ÌÍÜ×ÐØÐYÜË ÌÍÜ×ÐØÐYÜË ÌÍÜ×ÕÙ[YK ÌÍÜ×Ô7v÷&BÂb33c´÷'BÂb33c·76¤bW'&÷"FVà¢×6t&÷ÂgV÷C´W'&÷"6V¥¹µÍÍÅÕ½Ðì°ÅÕ½ÐíÉɽȽèÅÕ½ÐìµÀìÉɽȵÀìÅÕ½ÐìIèuot; & $rc) EndIf ... Other wise if i have the same thing just replace "GUICtrlRead(...)" with my info it works so thx Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now