ReadScheduledJobs.bsl

СоединениеADO = Новый COMОбъект("ADODB.Connection");
СоединениеADO.Open("Provider=SQLOLEDB; Data Source=""iA11""; Initial Catalog=""DemoSSL""; User Id=""""; Password="""";Trusted_Connection=Yes");
Запрос = Новый COMОбъект("ADODB.RecordSet");
Запрос.ActiveConnection = СоединениеADO;
Запрос.Open("SELECT _ID, _ActivationCondition FROM dbo._ScheduledJobs2374");
Value = Запрос.Fields(1).Value;
Буфер = Новый БуферДвоичныхДанных(Value.GetLength());
Для Индекс = 0 По Value.GetLength()-1 Цикл
	Буфер.Установить(Индекс, Value.GetValue(Индекс));
КонецЦикла;
ЧтениеТекста = Новый ЧтениеТекста(Новый ПотокВПамяти(Буфер), КодировкаТекста.UTF8);
Ответ = ирОбщий.НайтиРегулярноеВыражениеЛкс(ЧтениеТекста.Прочитать(), "{""#"",([A-F0-9]{8}(?:-[A-F0-9]{4}){3}-[A-F0-9]{12}),\s{((\d{14},){5}[\d,]+)}", "УИД, Расписание,",, Истина, Истина, Ложь);