以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于在线升级的判断  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=92173)

--  作者:zhsenchzhi
--  发布时间:2016/10/27 23:06:00
--  关于在线升级的判断
在一个项目中,设置了通过互联网升级,在线升级路径也设置成功,但是由于某种原因,在线升级路径和文件不可访问了,导致在线升级出现错误,

现在想做一个判断,如果在线升级路径和文件存在,则进行升级,如果不存在,则不升级,请问,该怎样判断,才能最优,也就是效率最高

--  作者:有点蓝
--  发布时间:2016/10/27 23:16:00
--  
参考:http://www.foxtable.com/webhelp/scr/2709.htm
--  作者:zhsenchzhi
--  发布时间:2016/10/28 9:31:00
--  
请问   TryConnectHost("www.egridsoft.com")  这样的用法,是否适用文件的判断? 比如   TryConnectHost("http:\\\\www.egridsoft.com\\aaa\\aaa.txt")   或者  TryConnectHost("http:\\\\www.egridsoft.com\\aaa\\aaa.htm")
--  作者:有点蓝
--  发布时间:2016/10/28 9:56:00
--  
不能的

可以用DownloadFile试着下载这个文件,执行完毕后看下载目录是否有这个文件
try
    Network.DownloadFile("http://wechat.foxtable.com/FoxWeChat/kk.txt", "f:\\kk.txt")
catch ex As Exception
    msgbox("没有文件")
End try

http://www.foxtable.com/webhelp/scr/1402.htm

--  作者:zhsenchzhi
--  发布时间:2016/10/29 17:17:00
--  
目前 放置升级程序的网站有问题,客户在使用程序时,每次启动时总是报错,做以下代码测试,仍然报错

try
     Syscmd.Project.Update(False,True)
catch ex As Exception
    MessageBox.Show("fafdfdfdsfff")
End try

报错信息如下


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

详细信息如下

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

我想请教的是, 如何  在执行  Syscmd.Project.Update(False,True)  时,不报以上的弹出窗口错误,执行执行  catch  里面  的代码?


--  作者:有点蓝
--  发布时间:2016/10/29 17:28:00
--  
try
    Network.DownloadFile("http://www.xxxx.com/Update/update.txt", "f:\\
update
.txt")
catch ex As Exception
    msgbox("没有文件")
return
End try
Syscmd.Project.Update(False,True)

或者自己下载文件进行升级

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=90233
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=82266&replyID=572809&skin=1