请问，用VB怎样解压ZIP文件？

[liu_zhi_bin]

包括读取目录信息和每个文件的原始信息。

[liu_zhi_bin]

to of123():
已收到，非常感谢。

[liu_zhi_bin]

是否有人知道怎样用API函数去解决(Java除外）？我尝试了一下GetExpandedName，好象对.zip文件不起作用。

[lsr66]

找个控件来实现。想自己作的话就去好好研究zip文件的格式。

[litsnake1]

简单点嘛，用控件
再麻烦点嘛，用api函数
再麻烦点嘛，自己写一个算法实现（不过我是不行的，别看我哦）
再给一点例子：
http://www.csdn.net/Dev/Format/#压缩
http://expert.csdn.net/Expert/topic/684/684856.xml?temp=.5372278
http://expert.csdn.net/Expert/topic/1218/1218364.xml?temp=.7543756

[用户 昵称]

the code to accomplish this follow
http://www.csdn.net/cnshare/soft/6/6157.shtm

[lsr66]

to jennyvenus(JennyVenus)

缺少OCX控件

[lsr66]

jennyvenus(JennyVenus)所说的源码也是采用的别人的控件实现的。
该控件名为：xceedzip.ocx
已经找到
破解也已找到。
破解版到这里下载：

ftp://61.177.65.93:9001/软件/编程软件/编程辅助/控件/crk_xceedzip压缩解压缩控件/xceedzip.ocx

[用户 昵称]

thank lsr66(ok8888)

[lsr66]

呵呵，大家互相帮助，这样很好

[liu_zhi_bin]

问一个简单的问题：怎样把WINZIP控件引入VB?

[lsr66]

两种比较常用的方法：
1，“工程”－“部件”－“浏览”－找到XCEEDZIP.ocx-“确定”－把控件工具箱上的新东东画到FORM上。

2，用REGSVR32.EXE 注册XCEEDZIP.ocx,然后就可以象其它部件一样用了。
注册方法：
regsvr32 盘符:\路径\xceedzip.ocx

[of123]

不用那么麻烦。Winzip提供它的命令行程序：
Wzzip.exe (21k)
Wzunzip.exe (21k)

在VB中用shell函数调用即可。
如需要，我可以发给你。

[liu_zhi_bin]

to of123():
你真是热心的大好人。请发到：[e-mail].谢谢！

[liu_zhi_bin]

to lsr66(ok8888) :
我没有找到XCEEDZIP.ocx，不知为什么。我已安装了Winzip8.0.请指点迷津，谢谢！

[lsr66]

你仔细一点行不行？

上面已经发过了

[liu_zhi_bin]

to lsr66(ok8888) : sorry.

[of123]

已发出。请查收。

[lsr66]

能请问你究竟要干什么？
好像你提出的主题已经解决了吧？

[evbsky]

上面的下不到，发一个给我吧
[e-mail]