以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]备份  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=92552)

--  作者:苏州老街
--  发布时间:2016/11/7 8:34:00
--  [求助]备份
老师,下面是一个备份按钮代码以前没有报错,现在按下就报错。

Dim zip As New zipFile
Dim zFile As String = "E:\\文件\\备份\\项目管理.zip"            
Dim NewName As String 
NewName = Date.Today.Month & "." & Date.Today.Day & ".Table"
If FileSys.FileExists(zfile) Then \'如果压缩文件已经存在
    zip.Open(zFile) \'则打开
Else
    zip.Create(zFile) \'否则创建
End If
zip.AddFolder("I:\\项目管理")

zip.Close()



.NET Framework 版本:2.0.50727.3053
Foxtable 版本:2016.7.29.1
错误所在事件:窗口,系统,Button44,Click
详细错误信息:
Central dir not found.



--  作者:有点青
--  发布时间:2016/11/7 8:40:00
--  
对应的路径不存在,就会报这个错。
--  作者:有点青
--  发布时间:2016/11/7 8:45:00
--  
 或者,你把zip压缩包打开一下,看是否正常,如果不正常,删除一下重新创建。