在VBA中将数据从Excel导出到Oracle

Question

GOOD DAY! I have question on connection from Excel to Oracle. I don't know what is failing!. My program migrates data and generates a log in another table, and the connection from Oracle fails.

Does anyone know why? It's my first program! Thanks!!!!!!!!!

Dim Password As String
Dim SQLStr As String
Dim Server_Name As String
Dim User_ID As String
Dim Database_Name As String

Set rs = CreateObject("ADODB.Recordset")
Server_Name = "localhost"
Database_Name = "BDNAME"
User_ID = "ID"
Password = "PSW"

Set Cn = CreateObject("ADODB.Connection")
Cn.Open "Driver={oracle};Server=" & _
    Server_Name & ";Database=" & Database_Name & _
        ";Uid=" & User_ID & ";Pwd=" & Password & ";"
connect = Cn

Answer 1

Driver={oracle}; is wrong.

It depends on the driver/provider you have installed on your machine. I would recommend to use the Oracle Provider for OLE DB, you can download from ODAC Runtime Downloads

In this case the connectionString would be

Cn.Open "Provider=OraOLEDB.Oracle;Data Source=" & Database_Name & _
    ";User ID=" & User_ID & ";Password=" & Password

If you like to use other drivers, have a look at https://www.connectionstrings.com/oracle/