ZIP.au3 UDF in pure AutoIt

[ludocus]

Looks great!

This could come in handy for many things!

[TheSaint]

.... ummm torels

It pays to do a search first - you would have then discovered that this has all been done back in January 2006 by Mozart90, eltorro, erifash, PsaltyDS & others.

SEE THIS POST

I haven't scrutinised your version to see if you've added or missed anything, but a lot of us have been using most of this for some time.

I'm not denigrating the work you've done - all work, experience & practice is beneficial. But maybe you could have spent your time on something else if you'd done a simple search?

I just wrote a ZIP udf in AutoIt (without external files) which lets you create archieves, fill them with files and folders and extract them to your computer

these are the functions

Edit: UPDATED

_ZipCreate($filename);returns the handle of the zip file (if function is assigned to a variable)
 _ZipAddFile($ZipFile, $File2Add, $flag);sets @error to 1-2-3 in case of failure
 _ZipAddFolder($ZipFile, $Folder, $flag);sets @error to 1-2-3 in case of failure
 _ZipUnzipAll($ZipFile, $DestPath, $flag);sets @error to 1-2-3 in case of failure
 _ZipUnzip($ZipFile,$FileName, $DestPath, $flag);sets @error to 1-2-3 in case of failure
 _Zip_Count($ZipFile);Count items in zip
 _Zip_List($ZipFile);list all files in the zip file

Any other suggestions ?

Comments are welcome

[weaponx]

@TheSaint - A little late (see post 14)

I just think you are reinventing the wheel when PSaltyDS already made the same UDF:

#198585

[torels]

@TheSaint - A little late (see post 14)

I just think you are reinventing the wheel when PSaltyDS already made the same UDF:

#198585

Searching ZIP in the forum nothing of that came out!

Anyway... think I'll just drop the thing then...

[DaleHohm]

I certainly would rather see you continue and build upon what others have done to create something even better. So long as you are improving on what what was already there and give credit where credit is due you'll get cheers instead of jabs.

Dale

[torels]

I certainly would rather see you continue and build upon what others have done to create something even better. So long as you are improving on what what was already there and give credit where credit is due you'll get cheers instead of jabs.

Dale

You're Right!

thanks

[TheSaint]

@TheSaint - A little late (see post 14)

I did see that, but it appeared to have been overlooked so I just added it again with more info.

@torels I agree with DaleHohm that if you are adding improvements then keep at it man - especially if you can add a password feature ... that would be nice!

[smashly]

Another count functions you could add.

The total count of files and folders contained in the zip (including sub directories and their files).

Presently the count function you use only gives a count of files & folders in the root of the zip.

Here's an example that returns the total file & folder count including sub directories, (no error checks, leave it to you if your interested or not)

Func _Zip_TotalCount($sZip)
    Local $oShell, $oDir, $sZipInf
    $oShell = ObjCreate("Shell.Application")
    $oDir = $oShell.NameSpace(StringLeft($sZip, StringInStr($sZip, "\", 0, -1)))
    $sZipInf = $oDir.GetDetailsOf($oDir.ParseName(StringTrimLeft($sZip, StringInStr($sZip, "\", 0, -1))), -1)
    Return StringMid($sZipInf, 28, StringInStr($sZipInf, @LF, 0, 1) - 28)
EndFunc

Cheers

[katrijn88]

Any other suggestions ?

Comments are welcome

Great! I was looking for this for a long time. Could you please add a function for searching a string inside zipped files? I need that to make a frontend of a simple backupprogram. TIA!

Katrijn.

[torels]

Great! I was looking for this for a long time. Could you please add a function for searching a string inside zipped files? I need that to make a frontend of a simple backupprogram. TIA!

Katrijn.

excuse me... what do you mean exactly ?

like extracting a file and searching a string in it or searching for a file matching with the string you pass to the function ??

[katrijn88]

Yes, I meant your first option:

like extracting a file and searching a string in it

So to search certain sentences in TXT-files that are archived. But aren't there algorithms that sort of 'extract as they search'? I think WinRAR uses this because its searching is so incredibly fast or is it extracting the data first? It's a pity 7-Zip doesn't have a searchfunction at all.

[GEOSoft]

Yes, I meant your first option:

So to search certain sentences in TXT-files that are archived. But aren't there algorithms that sort of 'extract as they search'? I think WinRAR uses this because its searching is so incredibly fast or is it extracting the data first? It's a pity 7-Zip doesn't have a searchfunction at all.

Here is a news flash for you. WinRAR uses the 7zip engine. The functionality you are asking for could be incredibly slow using the shell zip.

[torels]

Yes, I meant your first option:

So to search certain sentences in TXT-files that are archived. But aren't there algorithms that sort of 'extract as they search'? I think WinRAR uses this because its searching is so incredibly fast or is it extracting the data first? It's a pity 7-Zip doesn't have a searchfunction at all.

With no need to write a whole function... you could simply get all files in the zip, extract one by one and search the file once it is extracted and move on to the next file

I think it's the only way anyway

[torels]

by the way... 2 new updates arriving...

1) _Zip_Search

2) _Zip_SearchInFile (the func katinjn88 said)

to do list:
---------------------------------------------
- Find a way to delete a file... no such func in shell.application OBJ
- Try and add a password to zip files (think it is clear in the code :D)

[goldenix]

Tested 2 functions with autoit 3.2.10.0

_Zip_Create - works but sometimes displays Adding files Gui, that looks similar to Windows moving files dialog if you add loads of files & if you click any keyboard button then cancel button on the GUI is pressed & i donno what happens then, adding file aborted?

_Zip_AddFolder - Has never worked, & nor it works now out of my folder with 50 files, first tile it added only 5 & on second attempt it added 10 files & created L1a02796 file in same dir as my New folder ( after I renamed it to .rar it turned out to be a compressed (& contained 11 files) but incomplete file. unexpected end of archive said winrar)

Edit: I forgot, you may want to add UTF-8 Support to do so create Zip.au3 with fileOpen (Flag =128) & paster your original Zip.au3 code there & for test.zip create it in a same way i guess.Just switching encoding mode in scite wont work, i tried, your au3 file must be in UTF-8 format already when opened in scite

Edited June 30, 2008 by goldenix

[ikaros]

Great, friends, thanks for that, you just saved me a lot of hours and pain killers (muttley)

[m0nk3yI3unz]

Hi there!

I just wrote a ZIP udf in AutoIt (without external files) which lets you create archieves, fill them with files and folders and extract them to your computer muttley

these are the functions

Edit: UPDATED 30/6/2008

_ZipCreate($filename);returns the handle of the zip file (if function is assigned to a variable)
_ZipAddFile($ZipFile, $File2Add, $flag);sets @error to 1-2-3 in case of failure
_ZipAddFolder($ZipFile, $Folder, $flag);sets @error to 1-2-3 in case of failure
_ZipUnzipAll($ZipFile, $DestPath, $flag);sets @error to 1-2-3 in case of failure
_ZipUnzip($ZipFile,$FileName, $DestPath, $flag);sets @error to 1-2-3 in case of failure
_Zip_Count($ZipFile);Count items in zip
_Zip_List($ZipFile);list all files in the zip file
_Zip_Search($ZipFile, $SearchString);search for files matching with the given parameter (no wildcards yet)
_Zip_SearchInFile($ZipFile, $SearchString);search for words matching the given parameter in all of the zip archive's files

Comments are welcome

previous number of downloads: 187

w00t! great stuff!

I found a typo in your source files however - through me off for a sec. You have two _Zip_Count() descriptions - the second should be _Zip_List() - the function names are correct, but their description names are wrong nothing major.

Thanks sooo much for these!

[nago]

Just had a go with _Zip_Search.

No matter what file I fed it to search for, it set @error=0. Always. I tried to debug a little but I ended up pulling my hair out. looks like the _ArrayAdd isn't doing anything in the code?

I can't tell, I'm not experienced enough. Either way, I couldn't get search to work muttley

[DexterMorgan]

This is really nice... Maybe you can add a _zipaddpassword...

[torels]

This is really nice... Maybe you can add a _zipaddpassword...

I've been searching for it but there's no such thing in the shell.application COM object.

Think I'll have to find an alternative... but Passwords aren't written clear in the zip's code