Oracle使用vba访问数据

设置我的con对象时，我总是收到424错误

Dim con As Object Dim rs As Object Dim query As String Set con = CreateObject(ADODB.Connection) Set rs = CreateObject(ADODB.Recordset) strCon = "Driver={Microsoft ODBC for Oracle}; " & _ "CONNECTSTRING=(jdbc:oracle:thin" & _ "(ADDRESS=(PROTOCOL=TCP)" & _ "(HOST=somehost)(PORT=10080))" & _ "(CONNECT_DATA=(SERVICE_NAME=somename))); uid=uid; pwd=pwd;" 

任何人都可以让我没有我做错了什么？

谢谢

Answer 1

喜欢这个：

 Set con = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset")