关于压缩文件的问题？

[LGYAN]

在VB中是否可以将几个文件压缩到.Cab中?
或者对文件进行压缩和解压缩。
有控件也可以，但是VB调用时不要出现什么About对话框。
如有源码，不胜感激。

[bafenghan]

用ARJ或者Winzip都可以啊！用shell就可以！

[gxingmin]

'拷贝一个winrar到你的程序目录下
'1、解压 将c:\aaa.rar 解压到c盘，good为密码
Shell App.Path & "\winrar.exe x -pgood c:\aaa.rar c:\", vbHide

'2、压缩，将c:\aaa.mdb压缩成c:\aaa.rar
Shell App.Path & "\winrar.exe m -ep -pgood c:\aaa.rar c:\aaa.mdb", vbHide

[LGYAN]

但我想不出现WinZip的对话框。

[mao0531]

用ARJ即可的，而且非常小。

[孙小雄]

Shell App.Path & "\winrar.exe x -pgood c:\aaa.rar c:\", vbHide

这个 会有窗体界面吗？

[LGYAN]

TO:mao0531:请问有例程吗？