Обмен между 1С:Предприятие 8 и совершенно другой системой на базе SQL.

А что за лицензионное соглашение? Производится же обмен данными между УТ и БП. А если у нас БП или другая программа не на базе 1С, что тогда делать? Во всем мире это норма. Если у нас данные хранятся на SQL, мы их вправе считывать при помощи любого интерфейса. Или?

Остается надеяться , что платформа 8.3 выйдет не раньше чем через 2-3 года.
И перед переходом на 8.3 снова изучить структуру базы. Не так плохо.
Лучше , чем XML.

забирать данные через com соединение

Я подключился к базе таким образом.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim cntr As Object
Dim trade As Object
Dim Элемент As Object
Dim СправочникКонтрагентов As Object

Set cntr = CreateObject("V81.COMConnector")
Set trade = cntr.Connect("File=""С:\My Documents\InfoBase1"";Usr=""Администратор"";")

Set СправочникКонтрагентов = trade.Справочники.Контрагенты

End Sub

Как мне перебрать из элементы справочника? Дело в том, что программист, той программы, которая собирается забирать данные, по-русски совсем не может. Поэтому мне надо ему помогать писать скрипт на VB.

Да еще, а как подсоединяться к серверному варианту базы?

Вот так у меня работает.

Dim cntr As Object
Dim trade As Object
Dim Клиенты As Object
Dim Результат As String

'In den naechsten 2.Zeilen wird die Verbindung hergestellt
Set cntr = CreateObject("V81.COMConnector")
Set trade = cntr.Connect("srvr=""сервер1"";Ref=""Trade"";Usr=""Администратор"";Pwd=""пароль"";")

Set Клиенты = trade.Catalogs.Контрагенты.Select()
т= 1

Do While Клиенты.Next()
Результат = Результат & Клиенты.Наименование & "; "
Loop


MsgBox (Результат)


А вот запрос выполнить из базы Access не получается. Кто нибудь мог бы подсказать, как запрос на VBA сделать, и вытащить данные из 1С?

запрос на VB :
Set мойзапрос = trade.NewObject("Запрос","текст запроса")

Set мойзапрос = trade.NewObject("Запрос","Выбрать Контрагенты.Ссылка ИЗ Справочник.Контрагенты КАК Контрагенты")

Вверху все работает. А вот следующие строки выдают ошибку.

Выборка = мойзапрос.Выполнить().Выбрать();
Выборка = мойзапрос.Execute().Choose()

Что я неправильно делаю? Как получить выборку, чтобы потом перебрать ее?

Если у вас обмен происходит через SQL таблицу,то почему не использовать COMObject("ADODB.Connection")

СтрокаПодключения="Provider=SQLOLEDB.1;Password=Пароль;Persist Security Info=True;User ID=billing_daemon;Initial Catalog=Таблица;Data Source=имяБазы";
Попытка
DataBaseConnection = Новый COMObject("ADODB.Connection");
Кодировка = "windows-1251";
DataBaseConnection.ConnectionString =СтрокаПодключения ;
DataBaseConnection.Open();

Команда=Новый COMОбъект("ADODB.Command");
Команда.ActiveConnection=DataBaseConnection;
RS = Новый COMОбъект("ADODB.Recordset");
НаборЗаписей=RS;

Запрос = Новый Запрос;
Запрос.Текст =
|"Выбрать
|
|
;
ВыборкаРез=Запрос.Выполнить().Выбрать();

Пока ВыборкаРез.Следующий()Цикл


ТекстЗапроса="INSERT INTO dbo.io_agent_debt VALUES ('"+Формат(ВыборкаРез.Data,"ДФ=""ММ/дд/гггг""")+"','"
+ВыборкаРез.Контрагент+"',"
+ВыборкаРез.ИНН+"',"
+ВыборкаРез.КПП+"',"
+ВыборкаРез.Сумма+"'," ;

Команда.CommandText=ТекстЗапроса;
НаборЗаписей.MoveNext();
КонецЦикла;

Исключение
Сообщить("Ошибка: " + ОписаниеОшибки());
КонецПопытки;
Попытка
НаборЗаписей.Close();
исключение
КонецПопытки;
DataBaseConnection.Close();

ADODB.Connection возвращает по-моему структуру таблиц, которая меняется с каждым переходом на новую платформу. А нам хотелось бы обращаться на уровне объектов.

Всем спасибо! Разобрался!

А как в Access установить параметр для запроса в 1С?

Запрос. УстановитьПараметр ("Параметр", "Адрес") выдает ошибку
Set Параметр = Запрос. УстановитьПараметр ("Параметр", "Адрес") также выдает ошибку

Со многим вроде бы разобрался. И все работает. Но хотелось бы задекларировать в Access переменную ВыборкаРезв которую я выгружаю Запрос.Выполнить().Выбрать();

Если я ее не декларирую то работает так:
Set ВыборкаРез = Запрос.Выполнить().Выбрать();
Если я ее декларирую как Dim ВыборкаРез As ADODB.Recordset, то не работает. :(