Нужны уточнения
значит если ето Оракл то есть внутрение средства
file - import - relational
значит вся связь через ODBC
вот кусок кода

sql.dbms = 'odbc'
sqlmessages = yes
odbc.source = '1C_SQL'
sql connect sa identified by 'sa'
show sqlcode

limit pd.reg.module to 'doc'

sql declare cursor_ cursor for -
SELECT -
_id = [dbo].[_1SJOURN].[IDDOC], -
_dat = [dbo].[_1SJOURN].[DATE_TIME_IDDOC], -
_nom = [dbo].[_1SJOURN].[DOCNO], -
_del =[dbo].[_1SJOURN].[ISMARK], -
_flg = [dbo].[_1SJOURN].[CLOSED], -
_frm = [dbo].[_1SJOURN].[SP1005], -
_inf = [dbo].[DH6451].[SP1008], -
_dti = [dbo].[DH6451].[SP8468], -
_s16 = [dbo].[DH6451].[SP6447], -
_s15 = [dbo].[DH6451].[SP7916], -
_s23 = [dbo].[DH6451].[SP8038], -
_p15 = [dbo].[DH6451].[SP8790], -
_s12 = [dbo].[DH6451].[SP9306], -
_s14 = [dbo].[DT6451].[SP6448], -
_col = [dbo].[DT6451].[SP6449], -
_lin = [dbo].[DT6451].[LINENO_] -
FROM [dbo].[DH6451], [dbo].[DT6451], [dbo].[_1SJOURN] -
WHERE [dbo].[DH6451].[IDDOC] = [dbo].[DT6451].[IDDOC] and -
[dbo].[_1SJOURN].[IDDOC]=[dbo].[DH6451].[IDDOC]


if sqlcode ne 0
then signal err1 'Declare cursor failed.'

sql open cursor_
if sqlcode ne 0
then signal err2 'Cursor open failed.'

_count = 0

show 'Records:'
while sqlcode eq 0
do
sql fetch cursor_ into -
:_id, -
:_dat, -
:_nom, -
:_del, -
:_flg, -
:_frm, -
:_inf, -
:_dti, -
:_s16, -
:_s15, -
:_s23, -
:_p15, -
:_s12, -
:_s14, -
:_col, -
:_lin

А вот как подключатся через ADO я просто не понимаю
я даже не втюливаю как DLL подключить к експресу