小编Sar*_*615的帖子

实际上，每次我使用Early绑定代码来使用ADODB Connection时，但是现在我想使用Late Binding Code。据我看来，代码似乎是完美的，但我却不知道如何得到错误，例如“参数类型错误，超出可接受范围或彼此冲突”。

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