我获得了压缩目录中文件的代码。这是
{{1}}
但是当压缩文件夹中已存在该文件时,此代码会产生问题。它给出了一个例外。如何覆盖已存在的文件?
此外,这段代码有点慢,有没有快速的方法来压缩文件?
答案 0 :(得分:0)
试试这个
'Open the zip file if it exists, else create a new one
Dim zip As Package = ZipPackage.Open(zipPath, _
IO.FileMode.Create, IO.FileAccess.ReadWrite, IO.FileShare.Read)