以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如果发现数据库文件不存在，直接退出项目  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=131190)
--  作者：明天的灵
--  发布时间：2019/2/19 22:29:00
--  [求助]如果发现数据库文件不存在，直接退出项目

在项目属性的BeforeConnectOuterDataSource

加入以下代码，发现还是不能马上退出 ，会去执行AfterOpenProject代码。


If FileSys.FileExists(e.projectpath & "data\\data.mdb") Then \'如果指定的数据库文件存在
    Select e.Name
     ... \'连接数据源
    End Select
Else
    MessageBox.Show("数据库文件不存在!退出程序","提醒")
    syscmd.project.Exit()
    Return 
    
End If
--  作者：有点蓝
--  发布时间：2019/2/19 22:39:00
--  
到这个事件判断是否存在指定的文件：http://www.foxtable.com/webhelp/scr/1615.htm

数据源照常连接即可
--  作者：明天的灵
--  发布时间：2019/2/20 8:41:00
--  
谢谢！