易语言zip压缩模块源码 [db:版本]

易语言zip压缩模块源码

系统结构:压缩文件,压缩目录,解压文件,解压指定文件,取错误信息,ZIP压缩文件_API,ZIP压缩目录_API,ZIP解压文件_API,ZIP解压指定文件_API,ZIP获取错误信息_API,

======程序集1
| |
| |------ _启动子程序
| |
| |------ 压缩文件
| |
| |------ 压缩目录
| |
| |------ 解压文件
| |
| |------ 解压指定文件
| |
| |------ 取错误信息
| |
| |
======调用的Dll
| |
| |---[dll]------ ZIP压缩文件_API
| |
| |---[dll]------ ZIP压缩目录_API
| |
| |---[dll]------ ZIP解压文件_API
| |
| |---[dll]------ ZIP解压指定文件_API
| |
| |---[dll]------ ZIP获取错误信息_API

调用的DLL命令:

.DLL命令 ZIP压缩文件_API, 整数型, "zip.dll", "MyZip_AddFile", 公开, <0 失败 , >0成功 同名文件将自动被替换(overwrite)
.参数 待压缩文件, 文本型, , (全路径)
.参数 目标文件, 文本型, , (全路径)

.DLL命令 ZIP压缩目录_API, 整数型, "zip.dll", "MyZip_AddDirectory", 公开, <0 失败 , >0成功 同名文件将自动被替换(overwrite)
.参数 待压缩目录, 文本型, , (全路径)
.参数 目标文件, 文本型, , (全路径)

.DLL命令 ZIP解压文件_API, 整数型, "zip.dll", "MyZip_ExtractFileAll", 公开, <0 失败 , >0成功
.参数 压缩文件, 文本型, , (全路径)
.参数 文件输出路径, 文本型, , (如果不存在,则自动创建该目录)

.DLL命令 ZIP解压指定文件_API, 整数型, "zip.dll", "MyZip_ExtractFileAll", 公开, <0 失败 , >0成功 同名文件将自动被替换(overwrite)
.参数 压缩文件, 文本型, , (全路径)
.参数 需要解包的文件, 文本型, , (不包含路径) 解压指定文件
.参数 目标文件, 文本型, , 全路径)

.DLL命令 ZIP获取错误信息_API, 整数型, "zip.dll", "MyZip_GetLastError", 公开, 在压缩/解压的过程中,如有错误发生,可立即调用该函数获取相关错误信息,并由msg返回
.参数 用于返回相关错误信息, 整数型, 传址, <0 失败 ,>0 成功