[浏览完整版]
标题：如何判断外部数据源是否能够连接
1楼
唐尸三摆手 发表于：2010/3/22 13:12:00如何判断外部数据源能否连接，以便定时对sql数据库中的数据进行统计分析，并定时导出。我们知道可以用PING 来对服务器进行判断能否连接，那么假设服务器不停机，而此时数据库正在进行备份，那么计划定时管理的任务就无法完成，所以需要对使用的数据源进行判断能否连接，以便进行下一步的定时导出操作，不知有没有这类的方法。
2楼
狐狸爸爸 发表于：2010/3/22 14:25:00Dim cn As New Data.Oledb.OledbConnection("连接字符串")
Try
cn.open()
cn.Close()
Messagebox.show("通")
Catch ex As Exception
Messagebox.show("不通")
End Try
3楼
唐尸三摆手 发表于：2010/3/22 14:44:00呵呵，成功了，真不希望总这样提问，岂不是把fox他爹当成代码翻译机了么？
4楼
mr725 发表于：2010/3/22 14:59:00以下是引用唐尸三摆手在2010-3-22 14:44:00的发言：
呵呵，成功了，真不希望总这样提问，岂不是把fox他爹当成代码翻译机了么？
呵呵，成功了，真不希望总这样提问，岂不是把fox他爹当成代码翻译机了么？
对我们来说机器语言或软件编程语言就好像是【外语】，当然要有翻译机罗～ 呵呵···
5楼
bohe 发表于：2010/11/10 11:07:00以下是引用狐狸爸爸在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
好不容易找到这个，最好写到帮助里去。
6楼
lihe60 发表于：2010/11/10 11:13:00以下是引用狐狸爸爸在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
上次我有类似的提问,说是不行,现在又行了,好.
7楼
liuruihua 发表于：2010/11/10 11:22:00用户已锁定！
8楼
lihe60 发表于：2010/11/10 11:25:00以下是引用liuruihua在2010-11-10 11:22:00的发言：
呵呵，其实很多功能对老六来说，不是不行，而是在于他认为这个问题重不重要，或有没有时间去考虑这个问题，就如现在的‘仿古’菜单，以前老六也是死活都说做不了传统菜单，现在不是又可以了吗？所以很多问题，只要时机到了，自然就水到渠成地解决了。
要求的人多了,贺老师就会考虑的.
9楼
bohe 发表于：2010/11/10 11:39:00以上代码放在什么地方？我放的BeforeOpenProject处没用
10楼
狐狸爸爸 发表于：2010/11/10 12:28:00以下是引用lihe60在2010-11-10 11:13:00的发言：
上次我有类似的提问,说是不行,现在又行了,好.
你的问题和这个不一样的。