如何判断vba数据库是否连接成功

1、首先需要先在VBA中启动数据库连接支持，按下Alt+F11打开VBA，在菜单栏选择“工具”到“引用”。

2、其次在d出的引用窗口中，找到MicrosoftActiveXDataObjects6.1Library和MicrosoftActiveXDataObjectsRecordset2.8Library。

3、最后把前面的框勾选上，点击确定即vba数据库连接成功。

方法如下：

在桌面上右键创建个文本，然后改后缀名为udl以后保存（1.udl），至于udl是什么各位可以百度下这里就不细说了。

注：udl(Universal Data Link)是通用数据连接文件，使用通用数据链接 (UDL) 文件来保存连接字符串。

2.打开这个文件以后输入服务器的ip（因为我是本机所以用了实例名）和用户名密码就可以测试连接了，是不是很方便。

两种方法~`

方法一:

执行一下放连接数据库代码的页面~`如果没有报错信息一般说明连接成功~`

方法二:

连接代码后面执行一个查询语句

<%

set rs = conn.execute("select top 1 * from [表名]")

response.write rs("上面表的任意一个字段名")

response.end

%>

执行这个页面后如果看到有返回值证明成功

---