1C8 и SQL Server 2000

Ком-сервер напиши, и через него. Ну или АДО, ОДыБыЦы.

 

а че мешает прямые запросы к SQL пользовать?
а вобще для большинства торг оборудования есть дрова под 1Сы

 

В восьмерке? Уже есть?

Я так понимаю что автору это пофиг. Бо у него с торг. оборудования мимо одноэса в базу данные идут.

 

в левый карман правой рукой лазить неудобно ИМХО...

блин да и в семерке нормально работало все... ессно через ВК

 

Таки не понял ответ. Т.е. уже под восьмерку написали прямые запросы?

 

Кусок работающего кода на языке 1Сv8, без внешних компонент:

АДОСоединение = Новый COMОбъект("ADODB.Connection");
АДОСоединение.Provider = "sqloledb";
АДОСоединение.Properties("Data Source").Value = "ServerDBName";
АДОСоединение.Properties("Initial Catalog").Value = "DBName";
АДОСоединение.Properties("User ID").Value = "sa";
АДОСоединение.Properties("Password").Value = "PASSWORD";
АДОСоединение.Open();

АДОКоманда = Новый COMОбъект("ADODB.Command");
АДОКоманда.ActiveConnection = АДОСоединение;
АДОКоманда.CommandText = "SELECT user AS user

|FROM users
|ORDER BY user";​

АДОКоманда.CommandType = ТипКомандыАДО("adCmdText");
АДОКоманда.Prepared = 1;

Состояние("Выполнение запроса...");
АДОРекордСет = Новый COMОбъект("ADODB.RecordSet");
АДОРекордСет = АДОКоманда.Execute();

Если АДОРекордСет.EOF() <> 0 Тогда

Сообщить("Нифига не прочиталось.");
Возврат;​

КонецЕСли;

Состояние("Заполнение таблицы...");
АДОРекордСет.MoveFirst();
Пока АДОРекордСет.EOF() = 0 Цикл

НоваяСтрока = ТЗ.Добавить();
ЭлементыФормы.СписокПользователей.СписокВыбора.Добавить(АДОРекордСет.Fields.Item(0).Value);
АДОРекордСет.MoveNext();
ОбработкаПрерыванияПользователя();​

КонецЦикла;
ЭлементыФормы.СписокПользователей.Значение = "<Без фильтра>";