Иногда необходимо подключиться к другим (не 1С-ным) БД на том же SQL.
Вот примерный код такого подключения:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Connection = Новый COMОбъект("ADODB.Connection"); СтрокаПодключения = "Provider=SQLOLEDB.1;Password=" + Здесь пароль доступа + ";Persist Security Info=True;User ID=" + Здесь имя пользователя + ";Initial Catalog=" + Здесь имя БД + "; Data Source=" + Здесь имя сервера + ";"; //Ну и выполним какой-нибудь запрос с обходом: Результат = Новый COMОбъект("ADODB.Command"); Результат.ActiveConnection = Connection; // работаем через это соединение Результат.CommandTimeOut = Connection.CommandTimeOut; // таков тайм-аут Результат.CommandType = "adCmdText"; // исполняем в точности процедуру Результат.CommandText = " S_elect name as Наименование | FROM | dbo.sysobjects'"; Выборка = Результат.Execute(); // выполняем процедуру Пока Выборка.Eof() = 0 Цикл Сообщить(Выборка.Fields("Наименование").Value); Выборка.MoveNext(); КонецЦикла; |
About the Author
