Welcome to the Xceed Community Sign in | Join | Help
Community Search  

Xceed UnZip

Sort Posts: Previous Next
  •  02-19-2008, 12:02 PM Post no. 5753

    Xceed UnZip

    What error could cause this function call to return warning messages, here is a sample of code I'm using

    Dim ResultCode As xcdError
    Dim XceedZip1 As New XceedZip
    XceedZip1.ZipFilename = strPLTransmissonDir & "\" & strFilename
    XceedZip1.UnzipToFolder = strDir
    XceedZip1.EncryptionPassword = "Password"
    XceedZip1.PreservePaths = False
    ResultCode = XceedZip1.Unzip

    If ResultCode <> xerSuccess Then
    m_response.Write "00008" & "," & XceedZip1.GetErrorDescription(xvtError, ResultCode)
    Exit Sub
    End If

    error message is [At least one Warning event was triggered because of a recoverable error]
  •  02-19-2008, 1:20 PM Post no. 5754 in reply to 5753

    Re: Xceed UnZip

    There are many reasons why Warnings can occur. I would suggest that you subscribe to the "Warning" event and see what is the warning in question.

    <code>
    Private Sub XceedZip1_Warning(ByVal sFilename As String, ByVal xWarning As XceedZipLibCtl.xcdWarning)
    MsgBox (sFilename & "," & XceedZip1.GetErrorDescription(xvtWarning, xWarning))
    End Sub
    </code>
    Charles Bérubé-Rémillard
    Technical Support
    Xceed Software Inc.
View as RSS news feed in XML
Contact | Site Map | Reviews | Legal Terms of Use | Trademarks | Privacy Statement Copyright 2008 Xceed Software Inc.