以文本方式查看主题

-  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=170828)
--  作者：漂亮美眉vszh
--  发布时间：2021/8/9 8:05:00
--  没有外网时不连数据库

图片点击可在新窗口打开查看此主题相关图片如下：11111.png
图片点击可在新窗口打开查看
老师，当我没有外网的时候，不连接某个数据库，写的代码为：
If e.name = "SupPPAP" Then
 If Network.Ping("168.1.1.1") = True  Then
        FTPACoon = "Provider=SQLOLEDB.1;Password=123456;Persist Security Info=True;User ID=sa;Initial Catalog=SupPPAPData;Data Source=168.1.1.1"
        e.ConnectionString = FTPACoon
    End If
End If
但打开软件时，依旧会弹出报错窗口
我是想没有外网时，这个数据库不连接，报错没有
--  作者：有点蓝
--  发布时间：2021/8/9 8:51:00
--  
1、贴出事件完整代码
2、调试
If e.name = "SupPPAP" Then
msgbox(1)
 If Network.Ping("168.1.1.1") = True  Then
        FTPACoon = "Provider=SQLOLEDB.1;Password=123456;Persist Security Info=True;User ID=sa;Initial Catalog=SupPPAPData;Data Source=168.1.1.1"
        e.ConnectionString = FTPACoon
msgbox(e.ConnectionString)
    End If
End If
--  作者：漂亮美眉vszh
--  发布时间：2021/8/9 9:11:00
--  

图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下：2.png
图片点击可在新窗口打开查看
--  作者：漂亮美眉vszh
--  发布时间：2021/8/9 9:13:00
--  

图片点击可在新窗口打开查看此主题相关图片如下：3.png
图片点击可在新窗口打开查看
老师：这个就是完整代码，判断一下数据库名，如果连网就连接这个数据库；现在是不连网，就报错
--  作者：有点蓝
--  发布时间：2021/8/9 9:16:00
--  
说明2个地址都无法连接
--  作者：漂亮美眉vszh
--  发布时间：2021/8/9 14:25:00
--  
以下是引用有点蓝在2021/8/9 9:16:00的发言：
说明2个地址都无法连接

老师，不连网时，无法连接这个数据库是对的，但报错，我如何屏蔽掉这个报错？
--  作者：有点蓝
--  发布时间：2021/8/9 14:43:00
--  
没有办法屏蔽，如果所有地址都连不上，那就直接退出项目

Syscmd.Project.Exit()正常退出Foxtable
Syscmd.Project.Exit(True)先保存数据，然后退出Foxtable
Syscmd.Project.Exit(False)不保存数据，强行退出Foxtable
--  作者：漂亮美眉vszh
--  发布时间：2021/8/9 14:53:00
--  
我有两个数据源，一个是本地的，一个是云端上的，本地的有一些表，云端有两张，如果网络连不上时，云端那个数据库我就不连接，但不想要这个报错出现。
--  作者：有点蓝
--  发布时间：2021/8/9 14:58:00
--  
没有办法不报错。

把云端的数据库表结构导出为一个access空表放到本地，如果云端无法连接就连接本地的access空表