我想在项目的BeforeOpenProject中写入命令,实现当我项目进行维护时、打开项目能够弹出维护提示、并退出项目不给登录。以下命令该怎么修改?
此主题相关图片如下:360截图20150116171016656.jpg
![dvubb 图片点击可在新窗口打开查看](UploadFile/2015-1/20151161775476048.jpg)
If Tables("系统维护").Current("系统维护").Checked = True Then '如果电脑日期大于 ****日期
e.Cancel = True '拒绝打开项目
e.HideSplashForm = True '关闭Foxtable的启动封面
MessageBox.Show("本系统于“&Tables("系统维护").Current("开始时间")&”至“&Tables("系统维护").Current("计划完成")&”期间进行维护,请该时间后再登录系统!!!", "系统维护提示",MessageBoxButtons.Ok,MessageBoxIcon.Warning,0, Windows.forms.MessageBoxOptions.ServiceNotification) '弹出提示窗口
End If