ZIP 파일 열기

네크 2014.06.15 22:20:39 *: Imports System.IO
Imports System.IO.Compression

Module Module1
Sub Main()

Dim Zip As New GZipStream(File.OpenRead("C:\Test.zip"), CompressionMode.Decompress)

Dim SR As New StreamReader(Zip)
Console.WriteLine(SR.ReadToEnd)

Zip.Close()
SR.Close()

Console.ReadKey()

End Sub


End Module