我想在程序中调用Winzip压缩/解压文件，有谁知道命令行参数？

Question

我有一个压缩解压的例子，采用两个DLL,zip.dll,upzip.dll.

Answer 1

唉。。用哪一个压成.adj的压缩工具，在dos下压缩，用winzip有的时候不有注册他不还你你按我同意这个按键，好像就，winzip -a 1.zip这个命令，你看一下他的帮助哪，不过我认为你不要用他，我以前做过，，哈哈哈：）

Answer 2

关注！
：griefforyou(为你伤心)　
pp616(平平)　             dll和控件可以发给我吗？
            [email protected]
            [email protected]

Answer 3

'贴：Private Sub Command1_Click()
    Dim wzipexe As String    ' winzip 执行文件的位置
    Dim wsource As String    ' 原始文件 (压缩前)
    Dim wtarget As String      ' 目地文件 (压缩后)
    Dim wcmd As String        ' Shell 指令
    Dim retval As Double      ' Shell 指令传回值    ' Shell 指令
    wzipexe = "C:\program files\winzip\WINzip32" ' winzip 执行文件的位置
    wtarget = Text2.Text  ' 目地文件 (压缩后)
    wsource = Text1.Text ' 原始文件 (压缩前)
    wcmd = wzipexe & " -a " & wtarget & " " & wsource
    retval = Shell(wcmd, 6)
    
    
End Sub