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 に答える