The .NET Framework 4.5 Gets ZIP: Listing 2

Extracting a compressed file with System.IO.Packaging.Package.

Using pkgFile As Package = Package.Open(ZipFullFilename, FileMode.Open, FileAccess.Read)
    For Each pkgPart As PackagePart In pkgFile.GetParts()
      Dim filename As String = Path.Combine(FolderPath, 
	      pkgPart.Uri.OriginalString.Replace("/", "\").Substring(1))
      Dim dirName As String = IO.Path.GetDirectoryName(filename)
      If Not IO.Directory.Exists(dirName) Then IO.Directory.CreateDirectory(dirName)
      Using stmSource As Stream = pkgPart.GetStream(FileMode.Open, FileAccess.Read)
        Using stmDestination As Stream = File.OpenWrite(filename)
          Dim arrBuffer(10000) As Byte
          Dim intRead As Integer
          intRead = stmSource.Read(arrBuffer, 0, arrBuffer.Length)
          While intRead > 0
            stmDestination.Write(arrBuffer, 0, intRead)
            intRead = stmSource.Read(arrBuffer, 0, arrBuffer.Length)
          End While
        End Using
      End Using
    Next
  End Using

About the Author

Joe Kunk is a Microsoft MVP in Visual Basic, three-time president of the Greater Lansing User Group for .NET, and developer for Dart Container Corporation of Mason, Michigan. He's been developing software for over 30 years and has worked in the education, government, financial and manufacturing industries. Kunk's co-authored the book "Professional DevExpress ASP.NET Controls" (Wrox Programmer to Programmer, 2009). He can be reached via email at [email protected].

comments powered by Disqus

Featured

  • Python in VS Code Adds Data Viewer for Debugging

    The January 2021 update to the Python Extension for Visual Studio Code is out with a short list of new features headed by a data viewer used while debugging.

  • GitHub Ships Enterprise Server 3.0 Release Candidate

    It's described as "the biggest ever change to Enterprise Server," with improvements to Actions, Packages, mobile, security and more.

  • Attacks on .NET Apps Grow in Number, Severity, Says Security Firm

    .NET apps were found to have more serious vulnerabilities and suffer more attacks last year, according to data gathered by Contrast Labs.

  • Microsoft Opens Up Old Win32 APIs to C# and Rust, More Languages to Come

    Microsoft is opening up old Win32 APIs long used for 32-bit Windows programming, letting coders use languages of their choice instead of the default C/C++ option.

Upcoming Events