Question

vb判断某个数据库是否存在

数据库是sql
比如数据库名是NG
那么我要怎么判断NG这个数据库是否存在？
我在做登录窗口，进去要在text1.text里面输入数据库，如果数据库存在就连接NG这个数据库！

代码要怎么写？本人没做过类似连数据的！一般里面都用adodc连库，管理数据！那位大侠有相关例子或者代码？谢谢

Answer 1

在连接前加入一个
if dir(trim(text1.text))<>"" then
msgbox "存在"
else
msgbox "不存在"
endif
加入这一种判断语句,就可以判断数据库文件是否存在了

Answer 2

‘连接数据库
" Provider=SQLOLEDB.1;Integrated Security=SSPI; Persist Security Info=False;Initial Catalog='" + text1.text+ "';Data Source=(local)"
'判断存在
rs.open "select 1 from master..sysdatabases where name='" & trim(text1.text)& "'"con,1,1
if rs.eof =false then'存在
msgbox"返回1"
end if