|
![]() |
#1 |
Участник
|
Вот так работает. Только BDE установите там, откуда запрашиваете данные.
X++: static void Job318(Args _args) { #CCADO #DEFINE.TIMEOUT (5) int id; str sql = 'SELECT max(pLogData.Num) FROM pLogData'; FilePath basePath = @'C:\orion03\baseproba'; TempStr connectionString; CCADOConnection ccADOConnection; CCADORecordSet ccADORecordSet; ; connectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + basePath + ';Extended Properties=Paradox 5.x;'; ccADOConnection = new CCADOConnection(); ccADOConnection.open(connectionString); ccADOConnection.CommandTimeout(#TIMEOUT); if (ccADOConnection) { ccADORecordSet = new ccADORecordSet(); ccADORecordSet.cursorLocation(#adUseServer); try { ccADORecordSet.open( sql, ccADOConnection, #adOpenStatic, #adLockReadOnly, #adCmdText); id = ccADORecordSet.fields().itemIdx(0).value(); info(strfmt('%1', id)); } catch (exception::Error) { throw error("Невозможно прочитать файл внешней базы данных"); } } else { throw error('Нет соединения'); } } |
|