Импорт файла Excel в базу данных Oracle - PullRequest
Новая
       27

Импорт файла Excel в базу данных Oracle

0 голосов
/ 21 ноября 2018

Я хочу импортировать лист Excel в базу данных Oracle.

Таблица была создана, и сценарий должен выбрать файл Excel из текстового поля, установить odbc и импортировать файл в базу данных с помощьюокно сообщения.

Я пытался написать скрипт, но я знаю, что это нужно изменить. 

Private Sub IMPORT_Click()
    Dim cn As ADODB.Connection, rs As    ADODB.Recordset
    Dim fileName As String
    Me.txtfile = fileName
    Dim pswd As String, strSQL As String
    pswd = "007"
    strSQL = "Insert into xyz(column1) VALUES ('&c2&')"
    Set cn = New ADODB.Connection
    cn.Open "Driver={Microsoft ODBC for Oracle};" & _
    "SERVER=company.com;User Id=xx;Password=" & pswd & ";"
    cn.Execute strSQL
    rs.Close
    Set rs = Nothing
    cn.Close
    Set cn = Nothing
End Sub
...