Xceed Logo
Shop
Xceed Zip for COM/ActiveX on x86/x64 Documentation
Example topics / Convert method example for VB
In This Topic
    Convert method example for VB
    In This Topic

    This example allows you to convert an already existing zip file (c:\Temp\TEST.zip) into a Self-Extracting zip file (c:\Temp\zip.exe). The example requires that you place a button and an Xceed Zip control on a form and assign the following code to the button's click event. A Message box will display the result code.

    Visual Basic Copy Code

    Private Sub Command1_Click()

      Dim ResultCode As xcdError  

      Call XceedZip1.License( "your license key" ) 

      'Specify the full path and name of the zip file which we wish to convert. 
      XceedZip1.ZipFilename = "c:\temp\test.zip"  

      'Specify the path to the Self-Extractor Module binary that you want to use.
      'For this example we use the 32-bit binary 
      XceedZip1.SfxBinaryModule = "c:\temp\xcdsfx32.bin"  

      'Convert the zip file, while specifying the new filename 
      ResultCode = XceedZip1.Convert("c:\Temp\zip.exe")  

      'Check the return value, display error or success message  

      If ResultCode <> xerSuccess Then 
        MsgBox "Unsuccessful. Error # " & Str(ResultCode) & " occurred. " & "Description: " & _ 
               XceedZip1.GetErrorDescription(xvtError, ResultCode) 
      Else 
        MsgBox "The file was converted successfully." 
      End If  
    End Sub

     

     

    © Xceed Software Inc. All Rights Reserved.

    Send comments on this topic.