利用VB.Net解ZIP文件

最新推荐文章于 2021-01-23 20:04:35 发布

subMain

最新推荐文章于 2021-01-23 20:04:35 发布

阅读量5.2k

点赞数

分类专栏： VB.Net 文章标签： vb.net string integer buffer 2010 c

本文链接：https://blog.csdn.net/submain/article/details/5275337

版权

这段代码展示了如何使用VB.Net结合Java.IO库来解压缩ZIP文件。它首先检查ZIP文件是否存在，然后创建所需的输出目录（如果不存在）。接着，通过ZipInputStream逐个处理ZIP文件中的条目，区分文件和文件夹，将文件数据读取到缓冲区并写入到输出目录中。

摘要由CSDN通过智能技术生成

Imports System.IO Imports java.io 'C:/WINNT/Microsoft.NET/Framework/v2.0.50727/vjslib.dll Imports java.util ''' <summary> ''' 解压（Zip） ''' </summary> ''' <param name="ZipFile">需要解压的ZIP文件</param> ''' <param name="OutputDirectory">输入目录</param> ''' <remarks>2010-01-30</remarks> Private Shared Sub Decompress(ByVal ZipFile As String, ByVal OutputDirectory As String) Dim zipIns As New java.io.File(ZipFile) Dim directoryIns As New java.io.File(OutputDirectory) '判断压缩文件是否存在 '如果不存在的场合，则退出 If zipIns.exists = False Then Return End If zipIns = Nothing '判断输出目录是否是目录 '如果不是目录的场合，再进行其它判断 If directoryIns.isDirectory = False Then '判断输出目录的类型是否是一个文件 '如果不是文件的场合