版本升级后,制作的升级包,在升级过程中,进度条显示即将结束时,弹出“Central dir not found”。
经过几次测试,在弹出上述信息后,update2.zip的升级包实际上已经完整下载到project目录下,但是没有释放覆盖原目录。手动解压后,运行是正常的。
update1.zip升级中是正常的。杀软已关闭、winzip最新。
但是在测试到20次时,成功升级1次;卸载重装低版本,再升级又不行了。
这种情况怎样处理?
此主题相关图片如下:录制_2019_09_12_08_00_39_114.gif

代码是:
try
Network.DownloadFile("http://xxx.xx.2.32/update/update.txt", ProjectPath & "update.txt")
Dim str As String = FileSys.ReadAllText(ProjectPath & "update.txt")
Dim ud() As String = str.Split("|") '获取文件内容
Dim Sdate1 As Date = Cdate(ud(0)) '服务器update.txt发布日期
Dim Sdate2 As Date = Cdate(ud(1)) '服务器Version.txt发布日期
Dim Cdate1 As Date = PublishDate '客户端发布日期
Dim Cdate2 As Date = FileSys.ReadAllText(ProjectPath & "\Bin\Version.txt") '客户端Version.txt发布日期
If Sdate2 > Cdate2 OrElse Sdate1 > Cdate1 Then
PopMessage("有新版本,正在下载更新!请稍候......","提示", PopIconEnum.ok, 5)
Syscmd.Project.Update(False,False) '静默升级代码
End If
catch ex As exception
msgbox(ex.message)
msgbox("下载失败")
End try
[此贴子已经被作者于2019/9/12 8:33:41编辑过]