- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 程序自启动请教 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185190)
-- 发布时间：2023/2/9 11:34:00
-- 程序自启动请教
目的:系统更新后,自动启动
我同一台电脑 开了2个 foxtable 应用
用另一个 b 检查 a 是否 运行.
If
ShowAppWindow("订单.XLS",1)
= False Then
Dim
Proc As
New
Process
Proc.File
=
"C:\\data\\订单.xls"
Proc.Start
End If
但是进程的名称 都是下图 ,要怎么弄呢
此主题相关图片如下：捕获.jpg
-- 发布时间：2023/2/9 11:45:00
--
到AfterOpenProject事件给不同项目设置不同的标题
ApplicationTitle = "xxx标题"
然后
If ShowAppWindow("xxx标题",1) = False Then
If ShowAppWindow("xxx标题",1) = False Then
[此贴子已经被作者于2023/2/9 13:44:01编辑过]
-- 发布时间：2023/2/9 13:42:00
--
蓝版 那个升级完成
在线升级结束，请重新启动程序
这个内容 能否不提示的呢
-- 发布时间：2023/2/9 13:46:00
--
不能的
-- 发布时间：2023/2/9 13:58:00
--
有什么办法 能够做到让 系统 更新后 自动重新打开呢
-- 发布时间：2023/2/9 14:01:00
--
如果是小版本升级，可以使用Syscmd.Project.Open(ProjectFile)
如果是大版本升级，没有办法，必须手工重新打开项目
-- 发布时间：2023/2/9 14:06:00
--
是在这里加吗？
If Syscmd.Project.Update(False,False) = False Then \'如果没有升级
else
Syscmd.Project.Open(ProjectFile)
endif
-- 发布时间：2023/2/9 14:14:00
--
看看：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=140043&authorid=0&page=0&star=2
-- 发布时间：2023/2/9 16:28:00
--
蓝版 还是不行
此主题相关图片如下：捕获.jpg
这个内容需要人手去点 , 才能重新打开程序.
我的场景是 用foxtable 在多个工控机做 数采 , 升级的时候需要 无人操作.
这个框框 不能取消掉吗?
-- 发布时间：2023/2/9 16:43:00
--
我4楼已经说了，这个提示无法去掉的。
还是用2个程序的方式，B程序判断有升级，关闭A程序，然后下载升级包直接整个解压覆盖A程序，再启动A程序。