Run commands (DB) ORACLE error

[Luigi]

Greetings,

I try run a script, with commands oracle, the first command run, no problem, the second, no run.

I miss any parameter?

Best regards.

#include <GUIConstants.au3>


Global $user_pass = InputBox("Pergunta", "senha", "", "*")
Global $user_name = @UserName
Global $host = "HostOracle"

$ADO = ObjCreate("ADODB.Connection")
$ADO.Open("Provider='OraOLEDB.Oracle';Data Source='" & $host & "';User Id='" & $user_name & "';Password='" & $user_pass & "';")

; run, no error
Oracle_Exec("SELECT 2 + 3 FROM dual")

; crash!!!
Oracle_Exec("SET HEADING ON")

Func Oracle_Exec($sql)
    Local $aRet
    Local $ADORS = ObjCreate("ADODB.Recordset")
    $ADORS.CursorType = 2
    $ADORS.LockType = 3
    $ADORS.Open($sql, $ADO)
    While Not $ADORS.EOF
        For $ii = 0 To $ADORS.Fields.Count - 1
            ConsoleWrite($ADORS.Fields($ii).Name & "[" & $ADORS.Fields($ii).Value & "]" & @TAB)
        Next
        ConsoleWrite(@CR)
        $ADORS.MoveNext
    WEnd
    $ADORS.Close
EndFunc   ;==>Oracle_Exec

$ADO.Close

 

I found an explanation "SET HEADING ON" (or similar) is not a SQL (DML, DDL, etc...), is a SQLPLUS command, does not have support.

See this.

 

Edited August 23, 2017 by Luigi

[mLipok]

Did you try my ADO.au3 UDF ?

[Luigi]

@mLipok, thanks for your reply.

I try, but it's my mistake, I try execute SQLPlus's commands instead of Oracle's commands.

Edited August 27, 2017 by Luigi