Процедура Сформировать()

СтрокаПодключения = 
"Provider=SQLOLEDB.1;
|User ID=***;
|Pwd=***;
|Data Source=***;
|Initial Catalog=***";//наша database



Попытка
Connection = СоздатьОбъект("ADODB.Connection"); 
Command = СоздатьОбъект("ADODB.Command"); 
RecordSet = СоздатьОбъект("ADODB.RecordSet");
Исключение
Предупреждение("Не удалось создать подключение!");
КонецПопытки;



//Попытка
Connection.Open(СокрЛП(СтрокаПодключения));
Command.ActiveConnection = Connection; 


RecordSet = Connection.Execute("SET NOCOUNT ON; Execute proc_export_daily_1csync"); 
//RecordSet.MoveFirst();

Пока RecordSet.EOF()=0 Цикл
//Сообщить(RecordSet.Fields(0).Value);
счетчик = счетчик + 1;
Сообщить(счетчик);
RecordSet.MoveNext();
КонецЦикла;	





КонецПроцедуры