Create a Self-Extracting Executable

Download Chilkat Zip ActiveX

This example shows how to create a self-extracting executable (EXE).

	***********************************************************
	*** Visual FoxPro Source Code Examples for Zip Compression
	*** Visual FoxPro Example Programs by Chilkat Software
	*** Visual FoxPro Examples for Zip Compression
	***********************************************************

	* This example creates a self-extracting EXE

	LOCAL zip

	zip = CreateObject('Chilkat.Zip2')
	zip.UnlockComponent('anything for 30-day trial')        

	* Create a new Zip and append files and directories recursively.
	zip.NewZip("myZip.zip")
	zip.AppendFiles("./Tree/*",1)

	* The self-extracting EXE can be created to automatically run
	* an EXE contained within it immediately after extracting.
	* zip.put_AutoRun("setup.exe")

	* If AutoTemp is true, the self-extracting EXE will not prompt
	* for an unzip directory, but will instead automatically
	* select (and create) a temp directory for unzipping.
	* zip.put_AutoTemp(true)

	* The self-extracting EXE can be created with encryption.
	* Valid values are: 
	* 0 = none, 1 = blowfish, 2 = twofish, 3 = rijndael (AES). 
	* zip.put_Encryption(1)
	* zip.SetPassword("myPassword")

	* NOTE: The PasswordProtect property is separate from the AES encryption
	* property.  PasswordProtect is for standard Zip password protection,
	* which is an encryption scheme that is somewhat easy to break.

	* Now create a self-extracting EXE
	zip.WriteExe("myZip.exe")
	zip.CloseZip()

	RELEASE zip

	RETURN .T.

	***********************************************************
	*** Visual FoxPro Source Code Samples for Zip Compression
	*** Visual FoxPro Sample Programs by Chilkat Software
	*** Visual FoxPro Samples for Zip Compression
	***********************************************************