Recuperer dbms_output dans un recordset
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
