实际上每次我都使用早期绑定(bind)代码来使用ADODB连接，但是现在我想使用后期绑定(bind)代码。 据我所知，代码似乎很完美，但我不知道如何收到错误，例如“参数类型错误，超出可接受的范围，或相互冲突。”
Sub Test()
Dim cn As Object
Dim rs As Object
Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.RecordSet")
cn.Open "Provider=Microsoft.JET.Oledb.4.0;Data Source=Y:\Operational Non Sensitive\Avon UK\UK Voice Productivity\UK AHT Report_.mdb"
rs.Open "Table1", cn, adOpenDynamic, adLockOptimistic
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing
End Sub
最佳答案
您是后期绑定(bind)，因此像 adOpenDynamic/adLockOptimistic 这样的枚举不存在并且默认为空变体。
在代码中将它们定义为常量，ADOVBS.INC列出它们的名称和值。
Const adOpenDynamic = 2
Const adLockOptimistic = 3
关于vba - Excel VBA ADODB 后期绑定(bind)错误，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/35434082/