主题：关于压缩文件中加文件夹

下面是帮助中的代码：

Dim zip As New zipFile
zip.Create("c:\data\backup.zip")
zip.AddFolder("c:\publish")
zip.Close()

生成的压缩文件，没有publish这个根文件夹，而是直接是publish下的全部文件。

有没办法在生成的压缩文件里面，首先创建一个publish文件夹，然后再导入全部文件？