как через ADO вызвать хрпроцедуру, которая пишет в BLOB (oracle)

← →
Rust1970 (2002-12-17 15:26) [0]

Привет.

Есть хранимая процедура...
PROCEDURE BB
( p_bl IN blob )
IS
BEGIN
insert into aa (bl1) values (p_bl);
commit;
END;

как из Delphi вызвать правильно вызвать эту процедуру через ADO.
Вот код на Васике:

Dim c As ADODB.Connection
Private Sub Command1_Click()
Dim r As New Recordset
Dim ar() As Byte
Dim v As Variant
ar = StrConv("ABCDEFG", vbFromUnicode)
v = ar
r.Open "aa", c, adOpenStatic, adLockOptimistic, adCmdTable
r.AddNew
r.Fields("bl1") = v
r.Update
End Sub
Private Sub Form_Load()
Set c = New Connection
c.Provider = "OraOLEDB.Oracle.1"
c.Open "data source=alex", "realt", "realt"
End Sub

Как это же сделать на Delphi?

← →
rust2002 (2002-12-17 15:37) [1]

Извините, господа!!!

Отманул меня программер злобный....ни тот бейсиковый код подсунул...:Ж)))
исходный текст следует читать так:
!!!!

Привет.

Есть хранимая процедура...
PROCEDURE BB
( p_bl IN blob )
IS
BEGIN
insert into aa (bl1) values (p_bl);
commit;
END;

как из Delphi вызвать правильно вызвать эту процедуру через ADO.

как через ADO вызвать хрпроцедуру, которая пишет в BLOB (oracle) Найти похожие ветки