C1zip的使用样例

d990213m · d990213m

你好。
附件里的Demo，你帮我看看哪里有误？
为什么生成后的zip文件，是无法解压的。

Alice · Alice

回复 11楼d990213m的帖子

谢谢您提供的Demo。
问题我们已经收到了，测试后给您反馈。

d990213m · d990213m

如果把解压的流程加个Demo进去的话，就非常感谢了！:rose

Alice · Alice

回复 11楼d990213m的帖子

按照您的示例，如果已经存在几个文件，想要压缩到指定的路径下。
主要通过创建zip文件，然后将指定文件添加到zip文件中。
代码参考：

Public Class Form1
Private m_Zip As C1ZipFile
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim strTextFileName(2) As String
Dim strFileName As String = "F:\123.zip"
Try
m_Zip.Create(strFileName)
Catch
MessageBox.Show("Can't create ZIP file, please try again.", "C1Zip")
End Try
strTextFileName(0) = "F:\test1.txt"
strTextFileName(1) = "F:\test2.txt"
For i = 0 To 1
m_Zip.Entries.Add(strTextFileName(i))
Next
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
m_Zip = New C1ZipFile()
End Sub
End Class

复制代码

Alice · Alice

回复 13楼d990213m的帖子

如果想指定路径下的所有文件压缩到指定zip文件。
和14楼的方法类似，不同的是，通过微软提供的接口Deirectory.GetFiles拿到该路径下的所有文件，然后添加到zip文件中。
假设在F盘的Files文件夹下有2个文件，将他们压缩到同一个zip文件Compress.zip中，代码参考：

Dim strTextFileName(2) As String
Dim appPath As String = "F:\Files"
Dim files As String() = System.IO.Directory.GetFiles(appPath)
Try
m_Zip.Create(appPath + "\Compress.zip")
Catch
MessageBox.Show("Can't create ZIP file, please try again.", "C1Zip")
End Try
Dim srcFile As String
For Each srcFile In files
' compress file
m_Zip.Entries.Add(srcFile)
Next

复制代码

d990213m · d990213m

你好。收到。

  另外，在电话里沟通的，压缩路径的情况如附件程序。
  我自己写的程序，无法压缩路径下的所有文件。

  如何能压缩一个路径下的所有文件。

d990213m · d990213m

你好。
找到压缩路径的方法了。
m_Zip.Entries.AddFolder(strPath)

Alice · Alice

回复 17楼d990213m的帖子

谢谢您的反馈。

根据电话沟通，如果您需要对zip文件解压缩，代码参考：

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Dim strFileName As String = "F:\123.zip"
Try
m_Zip.Open(strFileName)
Catch
MessageBox.Show("Invalid ZIP file, please try again.", "C1Zip")
End Try
Dim srcFile As C1ZipEntry
For Each srcFile In m_Zip.Entries
'expand file
m_Zip.Entries.Extract(srcFile.FileName)
Next
End Sub

复制代码

Alice · Alice

回复 17楼d990213m的帖子

请问您的问题进展如何？

如果没有问题，此帖子关闭。
如果有新的问题，请开新帖。

		自动登录	找回密码
密码			立即注册

C1zip的使用样例

本帖子中包含更多资源

本帖子中包含更多资源

活字格认证

微信认证勋章

元老葡萄