Процедура КнопкаВыполнитьНажатие(Кнопка)
Conn = Новый COMОбъект ("ADODB.Connection");
Conn.Open("Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Northwind");
RS = Новый COMОбъект ("ADODB.RecordSet");
RS.Open("select * from customers", Conn);
Пока НЕ (RS.EOF) Цикл
Сообщить(RS.Fields(1).Name());
Сообщить(RS.Fields(1).Value());
RS.MoveNext();
КонецЦикла;
RS.Close();
КонецПроцедуры