Vbscript code wrapper

[topten]

I have a vbscript code which is extracting a file from zipped archive

ZipFile5="c:\file.zip"
ExtractTo5="c:\folder"

set objShell5 = CreateObject("Shell.Application")
set FilesInZip5=objShell5.NameSpace(ZipFile5).items
objShell5.NameSpace(ExtractTo5).CopyHere(FilesInZip5),&H4

Set objShell5 = Nothing

I have written an autoit wrapper for that

 

$ZipFile5="C:\file.zip"
$ExtractTo5="C:\folder"



$objShell5 = ObjCreate ("Shell.Application")
$FilesInZip5=$objShell5.NameSpace($ZipFile5).items
$objShell5.NameSpace($ExtractTo5).CopyHere($FilesInZip5),&H4

It works fine if I dont use ",&H4" (option to unzip without progress bar)

When I add ,&H4 - I get an error 

==> Illegal text at the end of statement (one statement per line).:
$objShell5.NameSpace($ExtractTo5).CopyHere($FilesInZip5),&H4
$objShell5.NameSpace($ExtractTo5).CopyHere($FilesInZip5)^ ERROR

How can I use (wrap into autoit)  ,&H4 option?

[Danyfirex]

I autoit Long type is not with &h You must set 0x4

 

Saludos

Edited October 19, 2015 by Danyfirex

[topten]

Danyfirex , Do you mean something like this:  

$objShell5.NameSpace($ExtractTo5).CopyHere($FilesInZip5) & 0x4 ; This way didnt work

 

[Danyfirex]

I meant this:

$objShell5.NameSpace($ExtractTo5).CopyHere($FilesInZip5), 0x4 ; This way didnt work

Saludos

[topten]

This is the correct solution:

$objShell5.NameSpace($ExtractTo5).CopyHere($FilesInZip5, 0x4)

 

[Danyfirex]

Good. I just noticed the &h4 part.

 

Saludos