- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 发布程序客户端升级偶尔出错 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103078)
-- 发布时间：2017/6/30 10:35:00
-- 发布程序客户端升级偶尔出错
此主题相关图片如下：微信截图_20170630102543.png
此主题相关图片如下：微信截图_20170630102629.png
发布程序客户端升级偶尔出错，如图所示。将弹出错误提示关闭完成后，依然可以进入系统，点击手动升级后通常正常运行，这个问题时不时的来一下，请版主帮我支招。谢谢！
[此贴子已经被作者于2017/6/30 10:35:16编辑过]
-- 发布时间：2017/6/30 10:58:00
--
有的电脑直接这样不断的弹出提示，最后只能强行结束进程，不能进入系统当然也不能升级。
此主题相关图片如下：无标题.png
[此贴子已经被作者于2017/6/30 10:57:59编辑过]
-- 发布时间：2017/6/30 11:16:00
--
查看对应的m.exe 文件，从日期上看是旧文件，不是新发布的
覆盖客户端project 文件夹 可正常使用
[此贴子已经被作者于2017/6/30 11:19:48编辑过]
-- 发布时间：2017/6/30 11:44:00
--
是每一台电脑都这样，还是个别电脑这样？个别电脑是否固定是那几台？
-- 发布时间：2017/6/30 11:47:00
--
升级前，把那个文件夹删除呢？beforeOpenProject写代码
http://www.foxtable.com/webhelp/scr/0338.htm
-- 发布时间：2017/6/30 11:58:00
--
以下是引用有点甜在2017/6/30 11:44:00的发言：
是每一台电脑都这样，还是个别电脑这样？个别电脑是否固定是那几台？
不固定电脑，我觉得是随机出现的。
-- 发布时间：2017/6/30 12:13:00
--
试试5楼的方法，删除文件夹试试。
-- 发布时间：2017/6/30 15:21:00
--
以下是引用有点甜在2017/6/30 12:13:00的发言：
试试5楼的方法，删除文件夹试试。
试试5楼的方法，删除文件夹试试。
If Syscmd.Project.Update(False,False) = False Then \'如果没有升级
\'原AfterOpenProject事件代码
Else
If FileSys.DirectoryExists( ProjectPath & "\\project") Then \'如果目录
FileSys.DeleteDirectory(ProjectPath & "\\project",2,2) \'则删除之
End If
End If
这样写吗？
-- 发布时间：2017/6/30 16:19:00
--
测试有没有问题？
-- 发布时间：2017/6/30 16:54:00
--
以下是引用有点蓝在2017/6/30 16:19:00的发言：
是不是改过项目的名称？
测试有没有问题？
这个代码 有问题，删除不掉文件夹。请问该怎么修改？加入代码后需要观察一段时间后才能确认还报错不，因为本帖的报错是随机出现的，未发现规律。
项目名称没有更改过。