Foxtable(狐表)用户栏目专家坐堂 → [求助]发布后软件自动升级功能请教


  共有70人关注过本帖树形打印复制链接

主题:[求助]发布后软件自动升级功能请教

帅哥哟,离线,有人找我吗?
2900819580
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1374 积分:10050 威望:0 精华:0 注册:2015/6/30 8:46:00
[求助]发布后软件自动升级功能请教  发帖心情 Post By:2025/3/5 9:49:00 [只看该作者]

        If Syscmd.Project.Update(False, False) = False Then '如果没有升级   
            OpenId = 1
        Else
            Dim batPath As String = "C:\restart.bat"
            Dim str As String = "@echo off" & vbCrLf 
            str &= "timeout /t 3 /nobreak" & vbCrLf ' 延迟3秒确保进程释放 
            str &= "start " & """" & ProjectFile & """" & vbCrLf 
            str &= "del ""%~f0""" ' 自删除脚本 
            FileSys.WriteAllText(batPath, str, False, Encoding.Default)
            Dim Proc As New Process 
            Process.Start(batPath)
            Application.Exit()
        End If

老师,做了个批处理,但升级完成后有个升级成功的提示,批处理没办法执行。怎么处理

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112576 积分:573184 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/5 9:58:00 [只看该作者]

Dim Proc As New Process 
Proc.StartInfo.WorkingDirectory = "C:\"
Proc.StartInfo.FileName = batPath
Proc.Start()

 回到顶部
帅哥哟,离线,有人找我吗?
2900819580
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1374 积分:10050 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2025/3/5 11:30:00 [只看该作者]

@echo off
timeout /t 3 /nobreak
start "C:\foxtable\Professional\foxtable.exe"
timeout /t 1 / nobreak > nul 
del "%~f0"

老师,试过了,是批处理文件不执行,我单独执行它也不可以。
帮忙 看看我那里写错了

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112576 积分:573184 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/5 11:48:00 [只看该作者]

这个我就不懂了,没玩过

 回到顶部
帅哥哟,离线,有人找我吗?
2900819580
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1374 积分:10050 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2025/3/5 14:44:00 [只看该作者]

老师,那项目发布后
如何获取项目发布后的执行文件Exe的路径,ProjectFile只是得到项目的路径是不对的。

 回到顶部
帅哥哟,离线,有人找我吗?
2900819580
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1374 积分:10050 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2025/3/5 14:50:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:无标题20250305.png
图片点击可在新窗口打开查看

老师,升级完成后可不可以这个弹出对话框取消呀。

 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112576 积分:573184 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/5 14:56:00 [只看该作者]

无法取消。也建议升级后彻底关闭项目,再重新打开

 回到顶部
帅哥哟,离线,有人找我吗?
2900819580
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1374 积分:10050 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2025/3/5 15:01:00 [只看该作者]

但目前用来做大屏展示,没办法用鼠标操作,想让他升级后可以自动启动;
写了批处理文件在升级完成后那里,但就卡在这个对话框,这个对话框必须要关闭才执行升级完成后的命令!


老师,还有没有其它办法可以实现
[此贴子已经被作者于2025/3/5 15:01:16编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112576 积分:573184 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/5 15:27:00 [只看该作者]

如果是大版本升级,绝对不可能自动启动的,必须手动打开

 回到顶部