专家们好,请教一下,我们昨晚把数据库搬移到另一台服务器上,服务器名称以及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