takg

You are right; the request won't help me now. I am really just voting for including it. The _Zip.au3 works fine for now and I will keep the COM object and 7z options in mind for future. Thanks for all the help. I really appreciate it.

Created ticket #3180.

I use 7zip too but I'd rather not have to deal with installing 7zip on the machine. I'd rather have an option that I can build into an AutoIt exe. It would be great if the zipping capability was built into AutoIt. Is there somewhere I can make a feature request?

I believe the glitch is a file sharing violation. The function _Zip_Create isn't closing before the _Zip_AddItem starts. So, for now, the Sleep(2000) is necessary but not sure it will be enough in all cases. I like the simplicity of _Zip.au3 so I will keep using it but can anyone confirm that there isn't a better version? For example, a version that includes password protection? The COM object does not do password protection.

Using the Shell.Application COM Object qualifies as an Other (#4) option; I hadn't considered this option. I'll give it a try. Since changing to Sleep(2000) it seems to work. If it stops working I'll just use the COM Object. Thanks for your help.

Using Windows 7, 8 and 10. [No 9 because Windows ate 9 ;-)] I am not sure Windows has a built-in command line zip utility. If not then this option won't work for me. Also, the script failed again. I will try 2 seconds instead of half a second.

I have been using _Zip.au3 to put files in a zip container. I discovered a problem recently where the AutoIt script executable I created wasn't exiting after the zipping process was completed. The zip file appears to be created correctly but the executable just doesn't exit. Adding an Exit at the end of the script did nothing and there doesn't appear to be any errors except that the script appears to be paused (indicating a problem before the last line of code). This problem appears to be fixed by adding a Sleep(500) line after the _ZipCreate like this: $Zip = _Zip_Create($myzip) Sleep(500) _Zip_AddItem($Zip,$myfolder) I have no idea why this worked but perhaps if someone can explain why it works I will live with this workaround. In any case, after reading all the comments in the forum (see thread started by torels with title "ZIP.au3 UDF in pure AutoIt") about _Zip.au3 I am wondering if I should be using it at all. It might be more desirable to use a command line from an AutoIt script to do this. Also, I am hesitant to use _Zip.au3 because it doesn't appear to be distributed with AutoIt (even though it has been around since 2008), it may have been copied from someone else, and it doesn't appear to have been updated since 2008. Please recommend one of these options: 1) Continue using _Zip.au3 2) Use a different UDF for zip compression 3) Use a command line that just uses the zip features built into Windows. Before I consider this, I'd have to make sure the same command works in all current versions of Windows. Also, examples would be helpful (I saw an example on the thread listed above but can't find it now). 4) Other: it would be nice to have an option that can password protect the zip container. Does _Zip.au3 have it? I think it was recommended but it doesn't show up in _Zip.au3 feature list. Thanks in advance for your recommendations.

Damn Jos. That was it. Sorry for being so lame that I couldn't see that. Thanks for all your help. I really appreciate it.

Ok. Still not working in autoit (even after updating to Autoit 3.3.12.0). I am able to send email fine in openssl using similar settings on port 465 except that in openssl you have to use base64 encoding of username and password. I think this rules out settings in Gmail, ISP, firewalls, and other computer/network settings. Here is my script (with modified from/to email addresses and password). I tried it with and without @gmail.com for username and from address. Error message is "The transport failed to connect to the server." Hopefully someone can figure out what I am doing wrong. ;#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7 #AutoIt3Wrapper_Run_Debug_Mode=Y ;(Y/N) Run Script with console debugging. Default=N #Region INCLUDE ;################################## ; Include ;################################## #include <file.au3> #include <Inet.au3> #include <MsgBoxConstants.au3> #EndRegion INCLUDE #Region Variables ;################################## ; Variables ;##################################66 Global Enum _ $g__INetSmtpMailCom_ERROR_FileNotFound = 1, _ $g__INetSmtpMailCom_ERROR_Send, _ $g__INetSmtpMailCom_ERROR_ObjectCreation, _ $g__INetSmtpMailCom_ERROR_COUNTER Global Const $g__cdoSendUsingPickup = 1 ; Send message using the local SMTP service pickup directory. Global Const $g__cdoSendUsingPort = 2 ; Send the message using the network (SMTP over the network). Must use this to use Delivery Notification Global Const $g__cdoAnonymous = 0 ; Do not authenticate Global Const $g__cdoBasic = 1 ; basic (clear-text) authentication Global Const $g__cdoNTLM = 2 ; NTLM ; Delivery Status Notifications Global Const $g__cdoDSNDefault = 0 ; None Global Const $g__cdoDSNNever = 1 ; None Global Const $g__cdoDSNFailure = 2 ; Failure Global Const $g__cdoDSNSuccess = 4 ; Success Global Const $g__cdoDSNDelay = 8 ; Delay Global Const $g__cdoDSNSuccessFailOrDelay = 14 ; Success, failure or delay #EndRegion Variables ; *** Start sending email here *** $s_SmtpServer = "smtp.gmail.com" $s_FromName = "Tester" $s_FromAddress = "fromemail" $s_ToAddress = "toemail@gmail.com" $s_Body = "This is a test" $s_Subject = "Subject.. test" $s_AttachFiles = "" $s_CcAddress = "" $s_BccAddress = "" $s_Username = "fromemail" ;<= THIS IS REQUIRED $s_Password = "frompassword" ;<= THIS IS REQUIRED $s_IPPort = 465 $s_SSL = True $s_bIsHTMLBody = False $s_iDSNOptions = $g__cdoDSNDefault local $resp = _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $s_Body, $s_AttachFiles, $s_CcAddress, $s_BccAddress, $s_Username, $s_Password, $s_IPPort, $s_SSL, $s_bIsHTMLBody, $s_iDSNOptions) MsgBox(4096,"Response",$resp) #Region Example Script ;################################## ; Example Script ;################################## ;~ _Example() Func _Example() Local $sSmtpServer = "MailServer" ; address for the smtp-server to use - REQUIRED Local $sFromName = "Name" ; name from who the email was sent Local $sFromAddress = "your@Email.Address.com" ; address from where the mail should come Local $sToAddress = "your@Email.Address.com" ; destination address of the email - REQUIRED Local $sSubject = "Userinfo" ; subject from the email - can be anything you want it to be Local $sBody = "" ; the messagebody from the mail - can be left blank but then you get a blank mail Local $sAttachFiles = "" ; the file(s) you want to attach seperated with a ; (Semicolon) - leave blank if not needed Local $sCcAddress = "CCadress1@test.com" ; address for cc - leave blank if not needed Local $sBccAddress = "BCCadress1@test.com" ; address for bcc - leave blank if not needed Local $sImportance = "Normal" ; Send message priority: "High", "Normal", "Low" Local $sUsername = "******" ; username for the account used from where the mail gets sent - REQUIRED Local $sPassword = "********" ; password for the account used from where the mail gets sent - REQUIRED Local $iIPPort = 25 ; port used for sending the mail Local $bSSL = False ; enables/disables secure socket layer sending - set to True if using httpS ; Local $IPPort = 465 ; GMAIL port used for sending the mail ; Local $bSSL = True ; GMAIL enables/disables secure socket layer sending - set to True if using httpS Local $bIsHTMLBody = False Local $iDSNOptions = $g__cdoDSNDefault Local $rc = _INetSmtpMailCom($sSmtpServer, $sFromName, $sFromAddress, $sToAddress, $sSubject, $sBody, $sAttachFiles, $sCcAddress, $sBccAddress, $sImportance, $sUsername, $sPassword, $iIPPort, $bSSL, $bIsHTMLBody, $iDSNOptions) If @error Then MsgBox(0, "_INetSmtpMailCom(): Error sending message", _ "Error code: " & @error & @CRLF & @CRLF & _ "Error Hex Number: " & _INetSmtpMailCom_ErrHexNumber() & @CRLF & @CRLF & _ "Description: " & _INetSmtpMailCom_ErrDescription() & @CRLF & @CRLF & _ "Description (rc): " & $rc & @CRLF & @CRLF & _ "ScriptLine: " & _INetSmtpMailCom_ErrScriptLine() _ ) ConsoleWrite("### COM Error ! Number: " & _INetSmtpMailCom_ErrHexNumber() & " ScriptLine: " & _INetSmtpMailCom_ErrScriptLine() & " Description:" & _INetSmtpMailCom_ErrDescription() & @LF) EndIf EndFunc ;==>_Example #EndRegion Example Script #Region UDF Functions ; The UDF ; #FUNCTION# ==================================================================================================================== ; Name ..........: _INetSmtpMailCom ; Description ...: ; Syntax ........: _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress[, $s_Subject = ""[, $as_Body = ""[, ; $s_AttachFiles = ""[, $s_CcAddress = ""[, $s_BccAddress = ""[, $s_Importance = "Normal"[, $s_Username = ""[, ; $s_Password = ""[, $IPPort = 25[, $bSSL = False[, $bIsHTMLBody = False[, $iDSNOptions = $g__cdoDSNDefault]]]]]]]]]]]]) ; Parameters ....: $s_SmtpServer - A string value. ; $s_FromName - A string value. ; $s_FromAddress - A string value. ; $s_ToAddress - A string value. ; $s_Subject - [optional] A string value. Default is "". ; $s_Body - [optional] A string value. Default is "". ; $s_AttachFiles - [optional] A string value. Default is "". ; $s_CcAddress - [optional] A string value. Default is "". ; $s_BccAddress - [optional] A string value. Default is "". ; $s_Importance - [optional] A string value. Default is "Normal". ; $s_Username - [optional] A string value. Default is "". ; $s_Password - [optional] A string value. Default is "". ; $IPPort - [optional] An integer value. Default is 25. ; $bSSL - [optional] A binary value. Default is False. ; $bIsHTMLBody - [optional] A binary value. Default is False. ; $iDSNOptions - [optional] An integer value. Default is $g__cdoDSNDefault. ; Return values .: None ; Author ........: Jos ; Modified ......: mLipok ; Remarks .......: ; Related .......: http://www.autoitscript.com/forum/topic/23860-smtp-mailer-that-supports-html-and-attachments/ ; Link ..........: http://www.autoitscript.com/forum/topic/167292-smtp-mailer-udf/ ; Example .......: Yes ; =============================================================================================================================== Func _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject = "", $s_Body = "", $s_AttachFiles = "", $s_CcAddress = "", $s_BccAddress = "", $s_Importance = "Normal", $s_Username = "", $s_Password = "", $IPPort = 25, $bSSL = False, $bIsHTMLBody = False, $iDSNOptions = $g__cdoDSNDefault) ; init Error Handler _INetSmtpMailCom_ErrObjInit() Local $objEmail = ObjCreate("CDO.Message") If Not IsObj($objEmail) Then Return SetError($g__INetSmtpMailCom_ERROR_ObjectCreation, Dec(_INetSmtpMailCom_ErrHexNumber()), _INetSmtpMailCom_ErrDescription()) ; Clear previous Err information _INetSmtpMailCom_ErrHexNumber(0) _INetSmtpMailCom_ErrDescription('') _INetSmtpMailCom_ErrScriptLine('') $objEmail.From = '"' & $s_FromName & '" <' & $s_FromAddress & '>' $objEmail.To = $s_ToAddress If $s_CcAddress <> "" Then $objEmail.Cc = $s_CcAddress If $s_BccAddress <> "" Then $objEmail.Bcc = $s_BccAddress $objEmail.Subject = $s_Subject ; Select whether or not the content is sent as plain text or HTM If $bIsHTMLBody Then $objEmail.Textbody = $s_Body & @CRLF Else $objEmail.HTMLBody = $s_Body EndIf ; Add Attachments If $s_AttachFiles <> "" Then Local $S_Files2Attach = StringSplit($s_AttachFiles, ";") For $x = 1 To $S_Files2Attach[0] $S_Files2Attach[$x] = _PathFull($S_Files2Attach[$x]) If FileExists($S_Files2Attach[$x]) Then ConsoleWrite('+> File attachment added: ' & $S_Files2Attach[$x] & @LF) $objEmail.AddAttachment($S_Files2Attach[$x]) Else ConsoleWrite('!> File not found to attach: ' & $S_Files2Attach[$x] & @LF) Return SetError($g__INetSmtpMailCom_ERROR_FileNotFound, 0, 0) EndIf Next EndIf ; Set Email Configuration $objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = $g__cdoSendUsingPort $objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $s_SmtpServer If Number($IPPort) = 0 Then $IPPort = 25 $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") = $g__cdoBasic $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 $objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = $bSSL ;Update Configuration Settings $objEmail.Configuration.Fields.Update ; Set Email Importance Switch $s_Importance Case "High" $objEmail.Fields.Item("urn:schemas:mailheader:Importance") = "High" Case "Normal" $objEmail.Fields.Item("urn:schemas:mailheader:Importance") = "Normal" Case "Low" $objEmail.Fields.Item("urn:schemas:mailheader:Importance") = "Low" EndSwitch ; Set DSN options If $iDSNOptions <> $g__cdoDSNDefault And $iDSNOptions <> $g__cdoDSNNever Then $objEmail.DSNOptions = $iDSNOptions $objEmail.Fields.Item("urn:schemas:mailheader:disposition-notification-to") = $s_FromAddress ;~ $objEmail.Fields.Item("urn:schemas:mailheader:return-receipt-to") = $s_FromAddress EndIf ; Update Importance and Options fields $objEmail.Fields.Update ; Sent the Message $objEmail.Send If @error Then _INetSmtpMailCom_ErrObjCleanUp() Return SetError($g__INetSmtpMailCom_ERROR_Send, Dec(_INetSmtpMailCom_ErrHexNumber()), _INetSmtpMailCom_ErrDescription()) EndIf ; CleanUp $objEmail = "" _INetSmtpMailCom_ErrObjCleanUp() EndFunc ;==>_INetSmtpMailCom ; ; Com Error Handler Func _INetSmtpMailCom_ErrObjInit($bParam = Default) Local Static $oINetSmtpMailCom_Error = Default If $bParam == 'CleanUp' And $oINetSmtpMailCom_Error <> Default Then $oINetSmtpMailCom_Error = '' Return $oINetSmtpMailCom_Error EndIf If $oINetSmtpMailCom_Error = Default Then $oINetSmtpMailCom_Error = ObjEvent("AutoIt.Error", "_INetSmtpMailCom_ErrFunc") EndIf Return $oINetSmtpMailCom_Error EndFunc ;==>_INetSmtpMailCom_ErrObjInit Func _INetSmtpMailCom_ErrObjCleanUp() _INetSmtpMailCom_ErrObjInit('CleanUp') EndFunc ;==>_INetSmtpMailCom_ErrObjCleanUp Func _INetSmtpMailCom_ErrHexNumber($vData = Default) Local Static $vReturn = 0 If $vData <> Default Then $vReturn = $vData Return $vReturn EndFunc ;==>_INetSmtpMailCom_ErrHexNumber Func _INetSmtpMailCom_ErrDescription($sData = Default) Local Static $sReturn = '' If $sData <> Default Then $sReturn = $sData Return $sReturn EndFunc ;==>_INetSmtpMailCom_ErrDescription Func _INetSmtpMailCom_ErrScriptLine($iData = Default) Local Static $iReturn = '' If $iData <> Default Then $iReturn = $iData Return $iReturn EndFunc ;==>_INetSmtpMailCom_ErrScriptLine Func _INetSmtpMailCom_ErrFunc() _INetSmtpMailCom_ErrObjInit() _INetSmtpMailCom_ErrHexNumber(Hex(_INetSmtpMailCom_ErrObjInit().number, 8)) _INetSmtpMailCom_ErrDescription(StringStripWS(_INetSmtpMailCom_ErrObjInit().description, 3)) _INetSmtpMailCom_ErrScriptLine(_INetSmtpMailCom_ErrObjInit().ScriptLine) SetError(1); something to check for when this function returns Return EndFunc ;==>_INetSmtpMailCom_ErrFunc #EndRegion UDF Functions

Ok, with your advice and this link I at least have it working in openssl: http://pastebin.com/r0LiwdZy I also realized I had IMAP disabled in the Gmail account I was using. Not sure if that matters. It looks like you don't need the " -starttls smtp" command in openssl and just typing openssl on the command line alone to put it in openssl prompt seems to work better. In openssl I still have to encode username and password to base64. I used this app to encode (don't trust online converters): http://www.activexdev.com/app-base64-tools-software.htm Can anyone tell me if _INetSmtpMailCom.au3 needs to have username and password converted to base64? My guess is no but I would like someone to confirm. I will post again if I get this working in autoit.

telnet smtp.gmail.com 465 doesn't do anything for me; I just get a blank screen. So, I think the problem is with my setup. Maybe Verizon FIOS is blocking 465. If I use telnet smtp.gmail.com 587 I get: 220 mx.google.com ESMTP h35sm4399067qgd.26 - gsmtp. Does that mean it worked? Do you use plain text in the _INetSmtpMailCom username and password parameters?

I can't get _INetSmtpMailCom.au3 to work with Gmail, SMTP, TLS/SSL on port 587. After a long delay I get message "The transport failed to connect to the server." I have been using telnet and openssl to try to troubleshoot. For some reason, the only port that works in telnet and openssl is 587 (on Windows 7 Pro and 8 Pro, both 64-bit). Port 25 and 465 never connect (black screen in telnet and crash with openssl). I don't think this is a firewall issue but not sure it matters as long as 587 connects. The Gmail account has 2-step authentication off and "Access for less secure apps" is allowed in accounts.google.com. I know I need a App password if I want to use 2-step authentication (eventually I'd like to use the App password method but it is off for now). I have gotten openssl to log into the account but it requires the username and password be converted to base64. Does the _INetSmtpMailCom.au3 need the base64 encoded username and password as well? The openssl line that gets into account is: openssl s_client -starttls smtp -connect smtp.gmail.com:587 -crlf Not sure it is relevant, but with openssl I can't get past MAIL FROM: (error 555). I have tried base64 as well as plain text with and without the angle brackets (e.g., test@gmail.com and <test@gmail.com>) I will post code if needed but I think this has something to do with the formatting of the parameters.

BrewManNH --- I think that was it! My development computer is 64-bit. Thanks. I learned something today. I am not sure how this will affect things for me (namely, do I need x86 and x64 versions of everything? Or do I just need AutoItX3_x64.dll on 64-bit development machines?) but at least I have my work cut out for me now. Thanks again.

I just tried re-downloading and installing AutoIt on a different computer. The same behavior is observed. Namely, when the old dll is used, the external Loop.exe is closed. When the new (re-downloaded) dll is used, the Loop.exe does not close. So, at this point I strongly believe there is something wrong with the AutoItX3.dll version 3.3.12.0. I hope this helps someone. For now, I will continue to use the older version.

Does this mean you can't replicate the problem with what I posted? If so, the only possibilities left in my view are that there is something wrong with my computer or the dll I have is corrupted. I will try re-downloading the dll and test on another computer. My source code is irrelevant at this point because I can replicate the problem with what I have posted.

Please read the entire thread carefully before commenting. The scripts below are just meant to show - in a convenient way - the problem with ProcessClose in 3.3.12.0 version of AutoItX3.dll. Here is how to replicate the problem. You need two versions of the AutoItX3.dll (sorry, it won't let me attach so if you can't replicate it might be I have a corrupted version of the newer dll but other functions in the dll do work so I ruled this out): 3.3.12.0 and 3.2.10.0. Rename 3.3.12.0 to AutoItX3_new.dll and 3.2.10.0 to AutoItX3_old.dll. Now, create a Loop.exe file using this: while 1 Sleep(1000) wend Next, create a CloseLoop.exe using this script: ;Function declaration ;AU3_API int WINAPI AU3_ProcessClose(LPCWSTR szProcess); ;DllCall("AutoItX3_new.dll", "int", "AU3_ProcessClose","str", "Loop.exe") DllCall("AutoItX3_old.dll", "int", "AU3_ProcessClose","str", "Loop.exe") if @error Then msgbox(0,"failed",@error) Else msgbox(0,"success",@error) endif If you use the old dll, then it works. If you use the new dll, it does not.

I am hoping someone can help me out. To do the test, I think a simple loop.exe for the app to close would work. while 1 Sleep(1000) wend Now a script that loads the AutoItX3.dll and calls the ProcessClose function is needed. I have never used the DllCall function in AutoIt. Tutorial is here: http://www.autoitscript.com/forum/index.php?app=core&module=attach&section=attach&attach_id=25713 Here is the function: DllCall ( "dll", "return type", "function" [, "type1", param1 [, "type n", param n]] ) Would this work? DllCall("AutoItX3.dll","void","AU3_ProcessClose","dword","loop.exe") Could someone who knows how to use DllCall try this out? With AutoItX3.dll version 3.3.12.0 it will not work but with AutoItX3.dll version 3.2.10.0 it will work; namely, closing loop.exe. This is to test the dll. I know it would be easier to just use AutoIt built-in ProcessClose function. I am using the dll in another development environment. Also, if it works with both versions of the dll, I will have to post a sample from my development environment. Please note that this is only a dll issue. Also, I have tried running as adminstrator and it doesn't fix the problem.

I will try to replicate the behavior with a small app. This behavior happens with both a VB and a C# app.

I will try to replicate the problem in a small program on Tuesday. I am using Windows 7 SP1 Pro. Let me know what else you need to know. The ProcessExists function does work. I have tried Run As Administrator and that doesn't matter. I don't have the manual for the AutoItX3.dll version 3.2.10.0. Has something changed since then? Could this have something to do with closing the program that calls ProcessClose before the command has a chance to execute? I tried ProcessWaitClose but that didn't seem to work either.

I forgot to say AutoitX3.dll. Sorry about that. If nobody else can reproduce, I will try to post a sample. Everything works fine for compiled Autoit script. The problem is with the AutoitX3.dll

Followup: I am closing using the process name (e.g. "notepad.exe") not the PID.

I just installed version 3.3.12.0 of AutoItX3.dll and now ProcessClose does not work. If I put version 3.2.10.0 back in, it works. Any idea what's going on? I am using Windows 7 Pro.

Thanks guinness. I added these two lines to the top of my script (I don't know if the second line is necessary): #AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7 #AutoIt3Wrapper_run_debug_mode=Y Do you recommend leaving these two lines in or should I delete them when I am done debugging? When I press ctrl-F5, it did find an error: I had a typo in a variable name. I am puzzled why this error wasn't found in SciTE during Compile. Also, the line number was way off (34 in runtime but around 61 in editor). Any rules of thumb for matching editor line with line number referenced in runtime error messages? [Please note that I haven't inserted any include lines in the script.] Can you point me to better documentation of Au3Check than what I found at this link? http://www.autoitscript.com/autoit3/docs/intro/au3check.htm By the way, what's the difference between Compile and Build in the SciTE editor. Is it better to use the Aut2exe utility (Note: I use Aut2Exe only when I need to change the icon for the exe)? I remember reading about all this somewhere but I have forgotten where. In any case, thanks for your help. I learned something today thanks to you.

Thanks guinness. I didn't know about any of those options. I will see if that helps me troubleshoot at runtime (since I can't replicate the problem myself).

My question is really more of a general question. Seems like line numbers don't match between editor and runtime. If I have to I will post the script but I have edited it so line 34 (however that's defined in the runtime) is now a different line number.