0

设置我的 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;"

谁能让我不要我做错了什么?

谢谢

4

1 回答 1

2

像这样:

Set con = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
于 2012-11-02T15:48:05.753 回答