Foxtable(狐表)用户栏目专家坐堂 → 升级错误


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

主题:升级错误

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


加好友 发短信
等级:三尾狐 帖子:655 积分:7701 威望:0 精华:0 注册:2013/12/11 17:49:00
升级错误  发帖心情 Post By:2015/1/4 13:35:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:1.bmp
图片点击可在新窗口打开查看
.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2014.11.11.1
错误所在事件:
详细错误信息:
未将对象引用设置到对象的实例。

无法访问已释放的对象。
对象名:“O__oO0__”。



在线升级路劲  http://IP:端口/ddxt

[此贴子已经被作者于2015-1-4 13:38:34编辑过]

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/1/4 14:02:00 [只看该作者]

升级代码发出来我看看,应该是代码不对,后面跟着了其他代码.

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/1/4 14:03:00 [只看该作者]

http://www.foxtable.com/help/topics/2934.htm


3、在线

需要提醒一下,本节介绍的内容是针对发布后序的自动,所以要测试的话,必须运行发布后的序进行测试。

你可以在你的项目中加上一个在线的菜单命令或者按钮,代码很简单:

Syscmd.Project.Update()

执行上面的代码,系统首先检索路径中的update.txt文件,获得项目版本日期和Foxtable版本日期,和本机的项目版本日期和Foxtable版本日期进行比较,然后根据比较结果进行动作:

A、如果本机的项目版本日期大于等于update.txt中的项目版本日期,则不进行任何动作。

B、如果本机的项目版本日期小于update.txt中的项目版本日期,且本机的Foxtable版本日期等于update.txt中的Foxtable版本日期,则开始下载简化包update1.zip。

C、如果本机的项目版本日期小于update.txt中的项目版本日期,且本机的Foxtable版本日期不等于update.txt中的Foxtable版本日期,则开始下载完整包update2.zip。

包下载完成后,会自动解压并覆盖本机的文件,完成

因为单单项目本身的频率会超过同时项目和运行环境的频率,所以提供两个包,可以让客户端的日常更加快捷。

至此我们的在线功能已经完成,即使你是一个初次接触编的人,应该也能即时掌握。

Update的语法:

Syscmd.Project.Update(Prom1, Prom2)

Prom1: 可选参数,逻辑型,没有发现新版本时,是否提示用户。
Prom2: 可选参数,逻辑型,发现新版本时,是否提示用户

例如希望自动能够完全"静默",发现新版本时不提示,自动开始,没有发现新版本时也不提示:

Syscmd.Project.Update(False,False)

如果我们在AfterOpenProject下面的代码:

Syscmd.Project.Update(False,False) 
Forms
("窗口1").Open() '可能会出错

目的是希望打开项目的时候自动,然后打开窗口1。
但是上述代码肯定会在成功之后提示错误,因为一旦成功,Foxtable就会关闭,后面的打开窗口代码就会出错。
我们可以用下面的代码避免错误:

If Syscmd.Project.Update(False,False) = False Then '如果没有
     
Forms("窗口1").open()
End
 If

也就是说Update执行后会返回一个逻辑值,如果成功,返回True,否则返回False。


 回到顶部