Oracle
 sql >> Baza danych >  >> RDS >> Oracle

Jak wywołać procedurę składowaną Oracle ze skryptu Excel VBA?

Aby to zadziałało, musisz wykonać wiele prac instalacyjnych. Wypróbuj ten przewodnik.

Zawiera tę próbkę. Zakłada, że ​​wykonałeś odwołanie do ADO, pobrałeś dostawcę OleDB dla Oracle i skonfigurowałeś plik TNSNames.ora. Jeśli nie chcesz używać TNSNames.ora, możesz wypróbować alternatywne parametry połączenia

Dim Oracon As ADODB.Connection
Dim recset As New ADODB.Recordset
Dim cmd As New ADODB.Command
Dim param1 As New ADODB.Parameter
Dim param2 As New ADODB.Parameter
Dim objErr As ADODB.Error

Dim Message, Title, Default, DeptValue
Message = "Enter a department number (10, 20, or 30)"
Title = "Choose a Department"
Default = "30"

On Error GoTo err_test
DeptValue = InputBox(Message, Title, Default)
If DeptValue = "" Then Exit Sub
If DeptValue < 10 Or DeptValue > 30 Then DeptValue = 30

Set Oracon = CreateObject("ADODB.Connection")
Oracon.ConnectionString = "Provider=OraOLEDB.Oracle;" & _
                          "Data Source=exampledb;" & _
                          "User ID=scott;" & _
                          "Password=tiger;"  
Oracon.Open
Set cmd = New ADODB.Command
Set cmd.ActiveConnection = Oracon
Set param1 = cmd.CreateParameter("param1", adSmallInt, adParamInput, ,
                                DeptValue)
cmd.Parameters.Append param1
Set param2 = cmd.CreateParameter("param2", adSmallInt, adParamOutput)
cmd.Parameters.Append param2

' Enable PLSQLRSet property
Cmd.Properties ("PLSQLRSet") = TRUE  

cmd.CommandText = "{CALL Employees.GetEmpRecords(?, ?)}"
Set recset = cmd.Execute

' Disable PLSQLRSet property
Cmd.Properties ("PLSQLRSet") = FALSE 

Do While Not recset.EOF
   MsgBox "Number: " & recset.Fields("empno").Value & "  Name: " &
   recset.Fields("ename").Value & "  Dept: " & recset.Fields("deptno").Value
   recset.MoveNext
Loop

Exit Sub

err_test:
    MsgBox Error$
    For Each objErr In Oracon.Errors
        MsgBox objErr.Description
    Next
    Oracon.Errors.Clear
    Resume Next

Jeśli napotkasz problemy, możesz wrócić i zadać bardziej szczegółowe pytanie.



  1. Database
  2.   
  3. Mysql
  4.   
  5. Oracle
  6.   
  7. Sqlserver
  8.   
  9. PostgreSQL
  10.   
  11. Access
  12.   
  13. SQLite
  14.   
  15. MariaDB
  1. Webrick bardzo wolno odpowiada. Jak to przyspieszyć?

  2. Domyślne zachowanie automatycznego zatwierdzania połączenia JDBC

  3. Wydajne odczytywanie i importowanie plików CSV w Oracle PL/SQL

  4. Jak zmienić strukturę tabeli w Oracle?

  5. Jak skonfigurować zestaw znaków UTF8 w Oracle?