1,217
社区成员
发帖
与我相关
我的任务
分享vb+sql server 判断是否连上了数据库服务器(急)
如何检查vb要连接的数据库服务器是否存在,如果存在则连接，如果不存在，则提示信息并
进行相应的处理。详细说明的一定给分。
进行相应的处理。详细说明的一定给分。
...全文
请发表友善的回复…
发表回复
tomjoule 2002-05-09
- 打赏
- 举报
我指的是数据服务器，而不是数据库，还望注意！！！！！
antshome 2002-05-09
- 打赏
- 举报
主要是捕捉出错信息
sub checkConn()
on error goto here
dim rs as new adodb.recordset
rs.open "select * from sysobjects","driver={sql server};server=(local);uid=sa;pwd=xxx;database=master"
rs.close
exit sub
here:
msgbox "数据库连接出错"
end sub
sub checkConn()
on error goto here
dim rs as new adodb.recordset
rs.open "select * from sysobjects","driver={sql server};server=(local);uid=sa;pwd=xxx;database=master"
rs.close
exit sub
here:
msgbox "数据库连接出错"
end sub
lxqlogo0 2002-05-09
- 打赏
- 举报
捕捉错误！
lily0000000 2002-05-09
- 打赏
- 举报
强行连接，捕捉错误
Jameszht 2002-05-09
- 打赏
- 举报
sql系統中，用戶數據庫名保存在master的sysdatabases中，所以先連接到master庫,查找用戶數據庫是否存在.
