以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何让系统升级后自动重启  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55999)

--  作者:yifan3429
--  发布时间:2014/8/27 16:16:00
--  如何让系统升级后自动重启
如何让系统升级完成后后自动重启
--  作者:Bin
--  发布时间:2014/8/27 16:24:00
--  
目前只能手动重启.
--  作者:blackzhu
--  发布时间:2014/8/27 16:52:00
--  
可以的

重新打开项目的代码

前面已经提到,动态创建的表和列之后,都必须重新打开项目。
可以使用下面的代码重新打开当前项目:

Syscmd.Project.Open(ProjectFile)


--  作者:yifan3429
--  发布时间:2014/8/27 19:56:00
--  
这句代码放在什么地方   会循环重启吗
--  作者:有点甜
--  发布时间:2014/8/27 19:58:00
--  
以下是引用yifan3429在2014-8-27 19:56:00的发言:
这句代码放在什么地方   会循环重启吗

 

如果使用自动升级,是无法自动重启的,只能手动启动。

 

至少暂时不能。


--  作者:unverse
--  发布时间:2014/8/27 20:00:00
--  
 老朱这样不行吧,退出项目后后面的代码就不能执行了吧,这个代码应该添加在哪里?
--  作者:bohe
--  发布时间:2018/12/19 15:22:00
--  
If Syscmd.Project.Update(False,False) = True Then
  Syscmd.Project.Open(ProjectFile)     \'升级成功后重启项目
else \'如果没有升级
    \'原AfterOpenProject事件代码
End
 If

=======
上面代码测试成功
[此贴子已经被作者于2018/12/19 15:22:02编辑过]

--  作者:有点甜
--  发布时间:2018/12/19 15:54:00
--  
以下是引用bohe在2018/12/19 15:22:00的发言:
If Syscmd.Project.Update(False,False) = True Then
  Syscmd.Project.Open(ProjectFile)     \'升级成功后重启项目
else \'如果没有升级
    \'原AfterOpenProject事件代码
End
 If

=======
上面代码测试成功
[此贴子已经被作者于2018/12/19 15:22:02编辑过]

 

用重启吧 Application.ReStart

 


--  作者:bohe
--  发布时间:2018/12/19 16:10:00
--  
升级程序建议改进,当网络不通或update.txt文件找不到的情况下,不要出现错误提示,就像foxtable本身一样。

====
经测试
Syscmd.Project.Open(ProjectFile)   和   Application.ReStart  都可以完成升级后重启软件的功能,不知有什么区别。
[此贴子已经被作者于2018/12/19 16:22:54编辑过]

--  作者:有点甜
--  发布时间:2018/12/19 16:29:00
--  
以下是引用bohe在2018/12/19 16:10:00的发言:
升级程序建议改进,当网络不通或update.txt文件找不到的情况下,不要出现错误提示,就像foxtable本身一样。

====
经测试
Syscmd.Project.Open(ProjectFile)   和   Application.ReStart  都可以完成升级后重启软件的功能,不知有什么区别。
[此贴子已经被作者于2018/12/19 16:22:54编辑过]

 

自己控制,如 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=119425&skin=0