Open Zip from URL (OpenFromWeb)

Open a .zip from a URL and unzip.

Download Chilkat Zip ActiveX

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
set zip = Server.CreateObject("Chilkat.Zip2")

'  Any string unlocks the component for the 1st 30-days.
success = zip.UnlockComponent("Anything for 30-day trial")
If (success <> 1) Then
    Response.Write zip.LastErrorText & "<br>"

End If

'  Downloads a .zip into memory and opens it.
success = zip.OpenFromWeb("http://www.chilkatsoft.com/testData/hamlet.zip")
If (success <> 1) Then
    Response.Write zip.LastErrorText & "<br>"

End If

'  It can be unzipped to disk:

fileCount = zip.Unzip("c:/temp")
If (fileCount < 0) Then
    Response.Write zip.LastErrorText & "<br>"

End If

'  Alternatively, individual entries may be unzipped into memory.
'  In this case, it is unzipped into a string:

addCR = 1
Set entry = zip.GetEntryByName("hamlet.xml")
If (Not (entry Is Nothing )) Then
    '  If the file has bare LF line endings, add the CR to get
    '  CRLF line endings.
    fileContents = entry.InflateToString(addCR)
    Response.Write fileContents & "<br>"
End If

%>
</body>
</html>

Need a specific example? Send a request to support@chilkatsoft.com