- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何判断外部数据源是否能够连接 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=6299)
-- 发布时间：2010/3/22 13:12:00
-- 如何判断外部数据源是否能够连接
如何判断外部数据源能否连接，以便定时对sql数据库中的数据进行统计分析，并定时导出。我们知道可以用PING 来对服务器进行判断能否连接，那么假设服务器不停机，而此时数据库正在进行备份，那么计划定时管理的任务就无法完成，所以需要对使用的数据源进行判断能否连接，以便进行下一步的定时导出操作，不知有没有这类的方法。
-- 发布时间：2010/3/22 14:25:00
--
Dim cn As New Data.Oledb.OledbConnection("连接字符串")
Try
cn.open()
cn.Close()
Messagebox.show("通")
Catch ex As Exception
Messagebox.show("不通")
End Try
-- 发布时间：2010/3/22 14:44:00
--
呵呵，成功了，真不希望总这样提问，岂不是把fox他爹当成代码翻译机了么？
-- 发布时间：2010/3/22 14:59:00
--
呵呵，成功了，真不希望总这样提问，岂不是把fox他爹当成代码翻译机了么？
对我们来说机器语言或软件编程语言就好像是【外语】，当然要有翻译机罗～ 呵呵···
-- 发布时间：2010/11/10 11:07:00
--
Dim cn As New Data.Oledb.OledbConnection("连接字符串")
Try
cn.open()
cn.Close()
Messagebox.show("通")
Catch ex As Exception
Messagebox.show("不通")
End Try
好不容易找到这个，最好写到帮助里去。
-- 发布时间：2010/11/10 11:13:00
--
Dim cn As New Data.Oledb.OledbConnection("连接字符串")
Try
cn.open()
cn.Close()
Messagebox.show("通")
Catch ex As Exception
Messagebox.show("不通")
End Try
上次我有类似的提问,说是不行,现在又行了,好.
-- 发布时间：2010/11/10 11:25:00
--
呵呵，其实很多功能对老六来说，不是不行，而是在于他认为这个问题重不重要，或有没有时间去考虑这个问题，就如现在的‘仿古’菜单，以前老六也是死活都说做不了传统菜单，现在不是又可以了吗？所以很多问题，只要时机到了，自然就水到渠成地解决了。
要求的人多了,贺老师就会考虑的.
-- 发布时间：2010/11/10 11:39:00
--
以上代码放在什么地方？我放的BeforeOpenProject处没用
-- 发布时间：2010/11/10 12:28:00
--
上次我有类似的提问,说是不行,现在又行了,好.
你的问题和这个不一样的。
-- 发布时间：2010/11/10 13:30:00
--
这段代码放的
BeforeConnectOuterDataSource
处吗？
加在此处也就起到不加载外部数据表的作用，我觉得一但起动时检测出连接问题最好自动退出系统。
foxtable目前的使用来看，使用外部数据源的应该占多数，如果是access的话连接自然不成问题，若是sql呢？连接稳定性肯定要考虑，使用外部数据源，连接出问题就要退出。
最好foxtable加入起动时检测外部数据源的功能，只要设置了外部数据源就自动检测，连接正常的话不占多少时间的。