以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  [求助]事件哪个在先？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=67921)

--  作者：chnfo --  发布时间：2015/5/6 11:10:00 --  [求助]事件哪个在先？ 请教：项目事件的BeforeConnectOuterDatasource与Afteropenproject哪个在先？

--  作者：Bin --  发布时间：2015/5/6 11:13:00 --   BeforeConnectOuterDatasource 在线 这类问题,你加入弹出框调试一下就知道了

--  作者：chnfo --  发布时间：2015/5/6 11:18:00 --   共享access数据库，在项目的安装目录下设了一个ip.txt来存储共享目录。 目的：在这个共享目录文件内容连接不上时，提示用户有错误，并退出系统。 在BeforeConnectOuterDataSource事件中这样写： Dim aa As String = e.ConnectionString.Split(";")(1).split("=")(1) ‘获得原来开发时设置的数据库文件’ If e.Name = "共享数据源" Then If Filesys.FileExists(e.ProjectPath & "IP.txt") Then Dim ip As String = FileSys.ReadAllText(e.ProjectPath & "IP.txt") ‘获得用户设置的共享数据库文件’ e.ConnectionString = e.ConnectionString.Replace(aa,ip) If Connections.TryConnect(e.ConnectionString) = False Then MessageBox.Show("数据库文件不存在,请到项目安装目录下的IP.txt文件中更新数据库文件!","提示",MessageBoxButtons.OK,MessageBoxIcon.Error) End If End If End If 现在的问题是：运行的时候，如果找不到数据库文件，除了弹出这个窗口，还会弹出一个错误窗口“创建外部连接“共享数据源”失败，请联系管理员或开发员，重新设置数据链接字符串”。 请教应当修改哪里才能达到目的呢？

--  作者：Bin --  发布时间：2015/5/6 11:22:00 --   在BEforOpenproject事件 判断一下文件是否存在. 不存在就执行 e.Cancle=True

--  作者：chnfo --  发布时间：2015/5/6 11:42:00 --   谢谢，掂