Foxtable(狐表)用户栏目专家坐堂 → 数据库更换IP后无法自动更新


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

主题:数据库更换IP后无法自动更新

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


加好友 发短信
等级:婴狐 帖子:12 积分:266 威望:0 精华:0 注册:2021/4/9 17:30:00
数据库更换IP后无法自动更新  发帖心情 Post By:2022/3/11 12:01:00 [显示全部帖子]

专家们好,请教一下,我们昨晚把数据库搬移到另一台服务器上,服务器名称以及IP都改了,然后数据源更新后,发布正常,程序运行也正常,就是自动更新更新不了。

然后在BeforeOpenProject和AfterOpenProject里加了弹窗,结果只有BeforeOpenProject事件有响应,AfterOpenProject事件完全没有执行到,请问我是哪里设置有问题吗?

 

测试了一下,发现自动更新那行代码没运行到。

BeforeOpenProject事件:

'禁止多开
MessageBox.Show("BeforeOpenProject : " & "Begin")

static mu As system.threading.mutex
Dim sucess As Boolean = False
mu=new system.threading.mutex(True,"APS排程系统",sucess) 'XXXXXXXX是你的程序名称

If not sucess Then
    MessageBox.show("系统已经在运行,请勿重复登录!","提示",MessageBoxButtons.Ok,MessageBoxIcon.Information, 0, System.Windows.forms.MessageBoxOptions.ServiceNotification)
    e.cancel=True
End  If

MessageBox.Show("BeforeOpenProject : " & "End")

 

这里的弹窗都有显示。

 

然后就报数据源连接错误,AfterOpenProject事件的第一行弹窗没有显示。

 

AfterOpenProject事件:

MessageBox.Show("AfterOpenProject : " & "Begin")

If FileSys.DirectoryExists(UpdatePath) Then
    If Syscmd.Project.Update(False,False) = True Then Return '如果有升级
End If

 


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


加好友 发短信
等级:婴狐 帖子:12 积分:266 威望:0 精华:0 注册:2021/4/9 17:30:00
  发帖心情 Post By:2022/3/11 16:42:00 [显示全部帖子]

哦,好的

 回到顶部