Имя: Пароль:
1C
1С v8
OLE подключение к 8.2 БП 2.0
0 AugustBlack
 
13.01.12
20:01
Здрасьте нужно подключится с одной базы в другую для того чтобы сравнить состояние документов(помечен на удаление/не помечен/проведен) как это сделать? смотрю примеры кода:
Conn = Новый COMObject("V82.COMConnector");
Connection = Conn.Connect("Srvr=""Server"";Ref=""БазаДанных"";Usr=""Админ"";Pwd=""Пароль"";");
Запрос = Connection.NewObject("Запрос");
Запрос.ТекстЗапроса = "
|ВЫБРАТЬ
|    Номенклатура.ВидТовара
|ИЗ
|    Справочник.Номенклатура КАК Номенклатура
|ГДЕ
|    Номенклатура.ВидТовара = &ВидТовара
|";
Запрос.Параметры.Вставить("ВидТовара",Connection.Перечисления.ВидыТоваров.Штучный);
Запрос.Выполнить.Выгрузить();  


не пойму что указывать в качестве "Srvr=""Server""? у меня же база файловая...
1 ДенисЧ
 
13.01.12
20:06
А в справке посмотреть? Там это есть...
2 ilkoder
 
13.01.12
20:06
Укажи путь до папки с базой
3 Рэйв
 
13.01.12
20:21
Если ВидСоединениеяСОМ=1 Тогда
           Если Вопрос("Создать файловое подключение?",РежимДиалогаВопрос.ДаНет)<>КодВозвратаДиалога.Да Тогда
               Возврат;
           КонецЕсли;    
           Сом=Новый COMObject("V81.COMConnector");
           Попытка
               Соединение = Сом.Connect ("File="""+СокрЛП(ПутьКБазеФ)+"""; Usr ="""+СокрЛП(ПользовательБазыФ)+""";Pwd ="""+СокрЛП(ПарольБазыФ)+"""");
           Исключение
               Сообщить(""+ОписаниеОшибки());
               Возврат;
           КонецПопытки;    
       ИначеЕсли ВидСоединениеяСОМ=2 Тогда
           Если Вопрос("Создать серверное подключение?",РежимДиалогаВопрос.ДаНет)<>КодВозвратаДиалога.Да Тогда
               Возврат;
           КонецЕсли;    
           Сом=Новый COMObject("V81.COMConnector");
           Попытка
               Соединение = Сом.Connect("Srvr="""+ИмяСервера+""";Ref="""+ИмяБазы+""";usr="""+ПользовательБазы+""";pwd="""+ПарольБазы+"""");
           Исключение
               Сообщить(""+ОписаниеОшибки());
               Возврат;
           КонецПопытки;    
           
       КонецЕсли;
4 AugustBlack
 
13.01.12
20:23
(2)(3) sps narod
5 AugustBlack
 
15.01.12
15:08
теперь ошибка когда я пытаюсь выполнить запрос:
Conn = Новый COMObject("V82.COMConnector");
Connection = Conn.Connect("File=""C:\Users\111\Documents\InfoBase8"";Usr=""1"";Pwd=""1"";");
Запрос = Connection.NewObject("Запрос");
Запрос.ТекстЗапроса = "ВЫБРАТЬ
                     |    СписаниеСРасчетногоСчета.Ссылка,
                     |    СписаниеСРасчетногоСчета.Проведен,
                     |    СписаниеСРасчетногоСчета.ПометкаУдаления,
                     |    СписаниеСРасчетногоСчета.Номер,
                     |    СписаниеСРасчетногоСчета.Дата
                     |ИЗ
                     |    Документ.СписаниеСРасчетногоСчета КАК СписаниеСРасчетногоСчета";

Результат = Запрос.Выполнить();

ВыборкаДетальныеЗаписи = Результат.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
       // Вставить обработку выборки ВыборкаДетальныеЗаписи
       Сообщить(ВыборкаДетальныеЗаписи.Номер);
КонецЦикла;

выдает ошибку:

{Форма.Форма.Форма(7)}: Поле объекта не обнаружено (ТекстЗапроса)

как правильно сделать запрос к той базе к которой я подрубаюсь???
6 AugustBlack
 
15.01.12
15:12
а понял .Текст нада писать