Jump to content
Sign in to follow this  
AceLoc

How to

Recommended Posts

HI,

try this:

zip()

Func zip()
    $oShell = ObjCreate("Shell.Application")          
    $ZipAchive = @ScriptDir & "\" & 'XXXXXXX.zip'; Name of zip-file
    If IsObj($oShell) Then
        initZip($ZipAchive)                        
        $oDir = $oShell.NameSpace ($ZipAchive)       
        $oDir.CopyHere (@ScriptDir & "\out")  ; path to folder        
        Sleep(100)                      ; set up when problems occur                              
    Else
        MsgBox(0, "Error", "Error creating Object.")
    EndIf
EndFunc  ;==>zipTXT

Func initZip($zip_path_name)
    $init_zipString = Chr(80) & Chr(75) & Chr(5) & Chr(6)   
    For $n = 1 To 18
        $init_zipString = $init_zipString & Chr(0)        
    Next
    $file = FileOpen($zip_path_name, 2)
    FileWrite($file, $init_zipString)                      
    FileClose($file)
EndFunc  ;==>initZip

So long,

Mega


Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Share this post


Link to post
Share on other sites

HI,

you need beta to run my code.

So long,

Mega


Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Share this post


Link to post
Share on other sites

Yes,

implement the func. The only install you need is to compile the script on your pc you need beta from autoit. Then the exe can be run on every windows pc without autoit installed!!!

So long,

Mega


Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Share this post


Link to post
Share on other sites

Yes,

implement the func. The only install you need is to compile the script on your pc you need beta from autoit. Then the exe can be run on every windows pc without autoit installed!!!

So long,

Mega

i downloaded the BETA now but your script still dont work :/


[quote name='AceLoc']I gots new sunglasses there cool.[/quote]

Share this post


Link to post
Share on other sites

Hi,

come on. Nobody can help you, just saying: The source you gave me is bullshit. :D

Show us what you tried and the error and I'm sure we will find a solution.

So long,

Mega


Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×
×
  • Create New...