Question

VBA连接 sqlserver2012 时连接出现错误，运行时提示“运行错误，自动化错误”

用VBA编一个信息管理系统，但是总是在连接数据库的时候出现问题。
在引用中已经加载了 microsoft objects recordset2.8 和 Microsoft ActiveX object 2.8 Library 控件。
提示是自动化错误。
点击调试键之后， 显示这一句 Set cn = New ADODB.Connection 错误。
请问是什么情况啊用VBA编一个信息管理系统，但是总是在连接数据库的时候出现问题。
在引用中已经加载了 microsoft objects recordset2.8 和 Microsoft ActiveX object 2.8 Library 控件。
提示是自动化错误。
点击调试键之后， 显示这一句 Set cn = New ADODB.Connection 错误。
请问是什么情况啊

VBA

Answer 1

1、删除set cn = new ADODB.Connection和set cnn = New ADODB.Recordset。已经引用了，没必要再次为对象赋值。
2、rst 和sql1没有赋值啊！