Recuperer dbms_output dans un recordset

[chesad]

Bonjour a tous,
je cherche désespérément a récupérer la sortie dbms_ouput dans un recordset

j'ai une requete de ce type

Code :

 request = "DECLARE bidon1 VARCHAR2(50); bidon2 VARCHAR2(50); BEGIN SELECT trunc(sysdate) into bidon1 FROM test; DBMS_OUTPUT.PUT_LINE (bidon1);END;"

que je passe à ma fonction suivante

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Public Function ExecuteRequest(ByRef cnx As ADODB.Connection, ByRef rst As ADODB.Recordset, ByVal Vprovider As String, ByVal VdataSource As String, ByVal Vuser As String, ByVal Vpassword As String, ByVal Vrequest As String) As ADODB.Recordset
    Dim cmd As ADODB.Command
 
    'Instanciation des variables
    Set cnx = New ADODB.Connection
    Set cmd = New ADODB.Command
    Set rst = New ADODB.Recordset
 
    cnx.ConnectionString = "Provider=" & Vprovider & ";Data Source=" & VdataSource & ";User Id=" & Vuser & ";password=" & Vpassword & ";"
    cnx.Open
 
    If cnx.State = adStateOpen Then
    'Préparation de l'objet Command
      cmd.ActiveConnection = cnx
      cmd.CommandText = Vrequest
    'Exécution de la  requête
      Set rst = cmd.Execute
    Else
        MsgBox ("ECHEC de connexion")
    End If
    Set ExecuteRequest = rst
 
 
 End Function

et je cherche à récupérer la sortie dbms_ouput d'une façon ou d'une autre sans devoir passer par une procédure stocké car je ne veux pas devoir créer une table pour l'alimenter avec les sorties oracles.

j'ai beau cherche via google je ne trouve pas d'exemples ou d 'explication sur le sujet , à croire qu'il n'est pas possible de récupéré une sortie de la console oracle dans vb6

Merci pour votre aide

[chesad]

personne n'a d 'élément pour m'aider à récupérer la sortie DBMS_OUPUT dans VB6. Il n'y a pas de moyen de lire dans le buffer correspondant ?