DataFlex

Transition from ZipEntry.GetDt to ZipEntry.FileDateTimeStr

Provides instructions for replacing deprecated GetDt method calls with FileDateTimeStr. DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoEntry
    Variant vDtObj
    Handle hoDtObj
    Handle hoDt
    Boolean iSuccess
    String sTemp1
    Boolean bTemp1

    Get Create (RefClass(cComChilkatZipEntry)) To hoEntry
    If (Not(IsComObjectCreated(hoEntry))) Begin
        Send CreateComObject of hoEntry
    End

    // ...
    // ...

    // ------------------------------------------------------------------------
    // The GetDt method is deprecated:

    Get ComGetDt Of hoEntry To vDtObj
    If (IsComObject(vDtObj)) Begin
        Get Create (RefClass(cComCkDateTime)) To hoDtObj
        Set pvComObject Of hoDtObj To vDtObj
    End
    Get ComLastMethodSuccess Of hoEntry To bTemp1
    If (bTemp1 = False) Begin
        Get ComLastErrorText Of hoEntry To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // ...
    // ...

    Send Destroy of hoDtObj

    // ------------------------------------------------------------------------
    // Do the equivalent using FileDateTimeStr.

    Get Create (RefClass(cComCkDateTime)) To hoDt
    If (Not(IsComObjectCreated(hoDt))) Begin
        Send CreateComObject of hoDt
    End
    Get ComFileDateTimeStr Of hoEntry To sTemp1
    Get ComSetFromRfc822 Of hoDt sTemp1 To iSuccess


End_Procedure