Zip.au3 _zip_unzipall: automatically confirm folder overwrite?

[emendelson]

Zip.au3 is a superb add-on which I'm using very successfully. I have one question to which I can't figure out an answer. Part of my script looks like this:

$mydir = @ProgramFilesDir + "MyFolder"
$gszip = @TempDir & "gslite.zip"
_Zip_UnzipAll($gszip, $mydir & "", 0)

The first time my script runs, of course, it writes the contents of gslite.zip into $mydir. The second time a user runs the script, Windows pops up a "Confirm Folder Replace" dialog box saying that the target directory and files already exist; should I replace them, Yes, Yes to All, No?

I can't figure out how automate the user's response to that dialog. (I want the script to answer "Yes to All"). I can't place WinWait and then Send AFTER the _Zip_UnzipAll line, because the window I am waiting for will already have been dismissed by the time the _Zip_UnzipAll function is complete. I can't put WinWait and Send BEFORE that _Zip_UnzipAll line, because the "Confirm Folder Replace" dialog won't appear until after the _Zip_UnzipAll line is reached.

Is it possible to copy the _Zip_UnzipAll function into my main script, and add the lines WinWait, Send, etc., to the function itself? If so, how might I do that?

The _Zip_UnzipAll function looks like this:

expandcollapse popup

;===============================================================================
;
; Function Name:    _Zip_UnzipAll()
; Description:    Extract all files contained in a ZIP Archieve.
; Parameter(s):  $hZipFile - Complete path to zip file that will be created (or handle if existant)
;    $hDestPath - Complete path to where the files will be extracted
;    $flag = 1
;    - 1 no progress box
;    - 0 progress box
; Requirement(s):   none.
; Return Value(s):  On Success - 0
;                  On Failure - sets @error 1~3
;    @error = 1 no Zip file
;    @error = 2 no dll
;    @error = 3 dll isn't registered
; Author(s):        torels_
; Notes:   The return values will be given once the extracting process is ultimated... it takes some time with big files
;
;===============================================================================
Func _Zip_UnzipAll($hZipFile, $hDestPath, $flag = 1)
Local $DLLChk = _Zip_DllChk()
If $DLLChk <> 0 Then Return SetError($DLLChk, 0, 0);no dll
If not _IsFullPath($hZipFile) then Return SetError(4,0) ;zip file isn't a full path
If Not FileExists($hZipFile) Then Return SetError(2, 0, 0) ;no zip file
If Not FileExists($hDestPath) Then DirCreate($hDestPath)
Local $aArray[1]
$oApp = ObjCreate("Shell.Application")
$oApp.Namespace($hDestPath).CopyHere($oApp.Namespace($hZipFile).Items)
For $item In $oApp.Namespace($hZipFile).Items
  _ArrayAdd($aArray, $item)
Next
While 1
  If $flag = 1 then _Hide()
  If FileExists($hDestPath & "" & $aArray[UBound($aArray) - 1]) Then
   Return SetError(0, 0, 1)
   ExitLoop
  EndIf
  Sleep(500)
WEnd
EndFunc   ;==>_Zip_UnzipAll

Thanks for any help with this.

Edited January 1, 2012 by emendelson

[Skitty]

Thanks for any help with this.

Test post

Edit: oh, wow, I'm not banned anymore, great.

Any way, I didn't read your entire post, so I am assuming you need to just make sure certain files do not exist before extracting data from a zip file right?

Just create a function that makes sure those files do not exist before extracting any data.

Edited January 1, 2012 by THAT1ANONYMOUSEDUDE

[Jos]

Edit: oh, wow, I'm not banned anymore, great.

Your choice whether it remain like this and I removed the obnoxious signature IP thing.

[Skitty]

Your choice whether it remain like this and I removed the obnoxious signature IP thing.

If you want me to remove it, I will.

Edit: I see you already did it.. I do not have a problem with you or melba, whatever my views, I am sorry if they conflict with yours, I am not here to change your views or opinions on anything, I will not bring anything even remotely related to what I had before, you have my word and my apologies, especially to melba.

Edited January 1, 2012 by THAT1ANONYMOUSEDUDE

[Melba23]

THAT1ANONYMOUSEDUDE,

my apologies, especially to melba

Accepted.

M23

[emendelson]

Any way, I didn't read your entire post, so I am assuming you need to just make sure certain files do not exist before extracting data from a zip file right?

Sorry - I should have been more clear. No - I want the program to click "Yes to All" and then have the zip au3 overwrite all the existing files in the target folder. Now that I think about it, I suppose I could rename or delete the existing target directory and then create the directory again and let the zip au3 write the files again as if they didn't exist. That would solve the problem, I think. But it might be more efficient if the program could respond automatically to the Confirm Folder Overwrite dialog, so I'll be grateful for any answer to the original question.

[Melba23]

emendelson,

I'll be grateful for any answer to the original question

Then you had best ask it in the Zip.au3 thread in the Examples forum. That way the author, who is the only one who really knows what is going on inside his code, can advise you.

M23

[emendelson]

Thank you - I'll ask where you suggest.

[PsaltyDS]

You are not using the current version of Zip.au3, where the function header is now:

expandcollapse popup

; #FUNCTION# ====================================================================================================
; Name...........: _Zip_UnzipAll
; Description....: Extract all files contained in a ZIP archive
; Syntax.........: _Zip_UnzipAll($sZipFile, $sDestPath[, $iFlag = 20])
; Parameters.....: $sZipFile - Full path to ZIP file
;    $sDestPath - Full path to the destination
;    $iFlag  - [Optional] File copy flags (Default = 4+16)
;       |   4 - No progress box
;       |   8 - Rename the file if a file of the same name already exists
;       |  16 - Respond "Yes to All" for any dialog that is displayed
;       |  64 - Preserve undo information, if possible
;       | 256 - Display a progress dialog box but do not show the file names
;       | 512 - Do not confirm the creation of a new directory if the operation requires one to be created
;       |1024 - Do not display a user interface if an error occurs
;       |2048 - Version 4.71. Do not copy the security attributes of the file
;       |4096 - Only operate in the local directory, don't operate recursively into subdirectories
;       |8192 - Version 5.0. Do not copy connected files as a group, only copy the specified files
;
; Return values..: Success  - 1
;    Failure  - 0 and sets @error
;       | 1 - zipfldr.dll does not exist
;       | 2 - Library not installed
;       | 3 - Not a full path
;       | 4 - ZIP file does not exist
;       | 5 - Failed to create destination (if necessary)
;       | 6 - Failed to open destination
;       | 7 - Failed to extract file(s)
; Author.........: wraithdu, torels
; Modified.......:
; Remarks........: Overwriting of destination files is controlled solely by the file copy flags (ie $iFlag = 1 is NOT valid).
; Related........:
; Link...........:
; Example........:
; ===============================================================================================================
Func _Zip_UnzipAll($sZipFile, $sDestPath, $iFlag = 20)
; ...
EndFunc   ;==>_Zip_UnzipAll

Note flag = 16 is for Yes-to-all, and the default flag is 20 (16 + 4).

[emendelson]

I didn't know about that new version. Will immediately upgrade. Thank you.