COM соединение с базой

[Ветер в поле]

Хотя вот нашел пример вызова хранимой процедуры, возвращающая набор строк. Но писал это "специалист" ПервогоБита, которые те еще студенты, но некоторое представление о коде дает.

Код Выделить Развернуть

Попытка
	ADOСоединение  = Новый COMОбъект("ADODB.Connection");
	ADOСоединение.ConnectionString = "Driver={SQL Server};Server=192.168.1.163;Database=EC;Uid=v8;Pwd=123456;";
	ADOСоединение.Open();
Исключение
	Сообщить(ОписаниеОшибки());
КонецПопытки;

Command = Новый COMObject("ADODB.Command");
Command.ActiveConnection = ADOСоединение;
ТекстЗапроса = "v8_getAnalysisListByPatient";
Command.CommandText = ТекстЗапроса;
Command.CommandType = 4;

Command.Parameters(1).value = Структура.ИД;

Результат = Command.Execute(); 
Массив = Новый массив;
Если НЕ Результат.EOF() Тогда
	МассивСтруктур = Новый Массив;
	Пока Результат.EOF() = 0 Цикл
		КолКолонок = Результат.Fields.Count();
		Строка  = Новый Структура;
		Для Инд = 0 По КолКолонок-1 Цикл
			Строка.Вставить(Строка(Результат.Fields(Инд).Name),Строка(Результат.Fields(Инд).Value));
		КонецЦикла;
		Массив.Добавить(Строка);
		Результат.MoveNext();
		
	КонецЦикла;
КонецЕсли;