Foxtable(狐表)用户栏目专家坐堂 → [求助]如何快速判断远程数据源是否正常


  共有315人关注过本帖树形打印复制链接

主题:[求助]如何快速判断远程数据源是否正常

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107440 积分:546479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/5/10 16:39:00 [显示全部帖子]

换种方式判断

Dim st As Date = Date.Now
Dim ip As String = Connections("SQL2008数据源").ConnectionString
Dim conn As System.Data.SqlClient.SqlConnection
Try
    conn  =  New System.Data.SqlClient.SqlConnection(ip .replace("Provider=SQLOLEDB.1;","Connection Timeout=1;"))
    conn.Open() '打开链接
    Output.Show("OK")
Catch ex As exception
    Output.Show(ex.message)
Finally
    conn.Close
End Try
MessageBox.Show("耗时: " & (Date.Now - st).TotalSeconds & "秒")
[此贴子已经被作者于2024/5/10 17:11:53编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107440 积分:546479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/5/10 17:12:00 [显示全部帖子]

 conn  =  New System.Data.SqlClient.SqlConnection(ip .replace("Provider=SQLOLEDB.1;","Connection Timeout=1;"))

这些都是.net的语法,看不懂网上搜搜

 回到顶部