以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  怎么实现数据源连接不成功的时候，就自动退出所有项目  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=174431)

--  作者：cnsjroom --  发布时间：2022/1/14 20:40:00 --  怎么实现数据源连接不成功的时候，就自动退出所有项目 Dim s1 As String ="Provider=SQLOLEDB.1;Password=Aa123456;Persist Security Info=True;User ID=sa;Initial Catalog=网安综合业务;Data Source=83.243.52.7" If Connections.TryConnect(s1) = False  Then        MessageBox.Show("数据源无法连通!") End If 上述代码在命令窗口中  可以正常提示  数据源无法连通  但是没有实现完全退出项目

--  作者：lgzhao --  发布时间：2022/1/15 3:22:00 --   If Connections.TryConnect(s1) = False  Then        MessageBox.Show("数据源无法连通!")   system.environment.Exit(0) End If

--  作者：xuzihang --  发布时间：2023/4/24 10:30:00 --   这个好用，已经用了 [此贴子已经被作者于2023/4/24 10:30:05编辑过]