(DataFlex) Transition from Zip.AppendSb to Zip.AddSb

Provides instructions for replacing deprecated AppendSb method calls with AddSb.

Note: This example requires Chilkat v11.0.0 or greater.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoZip
    String sPathInZip
    Variant vSb
    Handle hoSb
    Boolean iSuccess
    String sCharset
    Boolean iSuccess

    Get Create (RefClass(cComChilkatZip)) To hoZip
    If (Not(IsComObjectCreated(hoZip))) Begin
        Send CreateComObject of hoZip
    End

    // ...
    // ...
    Move "example.txt" To sPathInZip
    Get Create (RefClass(cComChilkatStringBuilder)) To hoSb
    If (Not(IsComObjectCreated(hoSb))) Begin
        Send CreateComObject of hoSb
    End
    Get ComAppend Of hoSb "This is a test" To iSuccess
    Move "utf-8" To sCharset

    // ------------------------------------------------------------------------
    // The AppendSb method is deprecated:

    Get pvComObject of hoSb to vSb
    Get ComAppendSb Of hoZip sPathInZip vSb sCharset To iSuccess

    // ------------------------------------------------------------------------
    // For consistency, the name has changed to AddSb.

    Get pvComObject of hoSb to vSb
    Get ComAddSb Of hoZip sPathInZip vSb sCharset To iSuccess


End_Procedure