VB6.0调用 DLL版ZIP压缩文件夹目录和解压ZIP文件

共3个文件

dll：2个

txt：1个

VB6.0

3星 · 超过75%的资源需积分: 42 31 下载量 132 浏览量 2022-07-17 00:13:48 上传评论 1 收藏 74KB RAR 举报

温馨提示

VB6.0调用 DLL版ZIP压缩文件夹目录和解压ZIP文件，网上很多源码不好用，所以就自己做了一个。原始代码是VC++的用VS2019编译了一个，DLL封装了下。调用很简单 '调用方法如下: 'CreateZipFileA "C:\123", "C:\123.zip") 压缩 Public Declare Function CreateZipFileA Lib "MirPack.dll" (ByVal sFolderPath As String, ByVal sZipFilePath As String) As Long 'UnZipFileA "C:\123", "C:\123.zip") 解压 Public Declare Function UnZipFileA Lib "MirPack.dll" (ByVal sFolderPath As String, ByVal sZipFilePath As String) As Long

资源详情

资源评论

资源推荐

收起资源包目录

VB调用新zlib压缩和解压_DLL封装版.rar （3个子文件）

MirPack.dll 149KB

zlib1.dll 73KB

使用说明.txt 815B

共 3 条

MirZip压缩模块调用如下主调者EXE文件和 zlib1.dll 和 MirPack.dll 都必须在同一个目录文件夹下！一、压缩函数原型如下： int __stdcall CreateZipFileA(char * sFolderPath, char* sZipFilePath); //目录路径调用方法如下： CreateZipFileA （"C:\123", "C:\123.zip") 二、解压函数原型如下： int __stdcall UnZipFileA(char * sFolderPath, char* sZipFilePath); //目录路径调用方法如下： UnZipFileA （"C:\123", "C:\123.zip") '调用方法如下: 'CreateZipFileA "C:\123", "C:\123.zip") 压缩 Public Declare Function CreateZipFileA Lib "MirPack.dll" (ByVal sFolderPath As String, ByVal sZipFilePath As String) As Long 'UnZipFileA "C:\123", "C:\123.zip") 解压 Public Declare Function UnZipFileA Lib "MirPack.dll" (ByVal sFolderPath As String, ByVal sZipFilePath As String) As Long