Имя: Пароль:
1C
1С v8
Помогите найти
,
0 Yorik
 
06.08.12
12:11
Доброе время суток!!!
Помогите найти в Книге знаний тему по подключению и переброске данных из одной базы в другую версии 8.1.
1 Yorik
 
06.08.12
15:52
Вот что я нашел

СтрокаПодключенияКУдаленнойБазе="File=""D:\BPT"";Usr=""Admin"";";
   УдаленнаяБаза = Новый COMОбъект("V82.Application");
   УдаленнаяБаза.Connect(СтрокаПодключенияКУдаленнойБазе);
   СпрТов = УдаленнаяБаза.NewObject("Справочник.Товар");
   Выб = СпрТов.Выбрать();
   Пока Выб.следующий() Цикл
       Наим = УдаленнаяБаза.Справочники.Товар.Выбрать().Description;
       Сообщить(Наим);
   КонецЦикла;

не прокатил
попробовал вот так

СтрокаПодключенияКУдаленнойБазе="File=""D:\BPT"";Usr=""Admin"";";
   УдаленнаяБаза = Новый COMОбъект("V82.Application");
   УдаленнаяБаза.Connect(СтрокаПодключенияКУдаленнойБазе);
   Спр = УдаленнаяБаза.Справочники.Товар.Выбрать();
   Пока Спр.Next() Цикл
       Сообщить(Спр.Description);
   КонецЦикла;


тоже вылетает..
в чем может быть дело а?
2 Aleksey
 
06.08.12
16:09
УдаленнаяБаза.Справочники.Товар.Выбрать() - открывает выборку, там нет элемента

"тоже вылетает." - куда вылетает?
3 1C-band
 
06.08.12
16:09
(0) Базы идентичные по структуре?
4 Yorik
 
06.08.12
16:17
Нет, я подрубаюсь из 8.1 к 8.2
5 hhhh
 
06.08.12
16:19
(4) а так

   ДваждыУдаленнаяБаза = УдаленнаяБаза.Connect(СтрокаПодключенияКУдаленнойБазе);
   СпрТов = ДваждыУдаленнаяБаза.NewObject("Справочник.Товар");
6 Yorik
 
06.08.12
16:23
(5)рискну
7 Yorik
 
06.08.12
16:29
(5)Значение не является значением объектного типа NewObject
8 hhhh
 
06.08.12
16:34
Справочники.Номенклатура ?
9 hhhh
 
06.08.12
16:35
такой команды не бывает

NewObject("Справочник.Товар");
10 Yorik
 
06.08.12
16:40
В базе 8.2 идет как "Справочник.Товар"...
11 Yorik
 
06.08.12
16:43
...попробовал другой тип, та же фигня. А через выборку никак?
12 Yorik
 
06.08.12
16:43
релиз 13 у 8.2
13 v8Newbie
 
06.08.12
16:50
(0) Выбери запросом. Пример. Соединяюсь с 8.2.

   БазаТЗ = Новый ТаблицаЗначений();
   БазаЗапрос = УдаленнаяБаза.NewObject("Запрос");
   БазаЗапрос.Текст = "ВЫБРАТЬ
       |    ЧекНаОплату.Номер,
       |    ЧекНаОплату.СуммаДокумента
       |ИЗ
       |    Документ.ЧекНаОплату КАК ЧекНаОплату
       |ГДЕ
       |    ЧекНаОплату.Проведен = ИСТИНА
       |    И ЧекНаОплату.Дата >= &ДатаНачала
       |    И ЧекНаОплату.Дата <= &ДатаОкончания";
       
   БазаЗапрос.УстановитьПараметр("ДатаНачала", ДатаНачала);
   БазаЗапрос.УстановитьПараметр("ДатаОкончания", ДатаОкончания);
   БазаТЗ = БазаЗапрос.Выполнить().Выгрузить();
14 Yorik
 
06.08.12
16:54
Запрос=ВнешняяБаза.NewObject("Запрос");
   Запрос.Текст=
   "ВЫБРАТЬ
   |    Товар.Наименование,
   |    Товар.Код
   |ИЗ
   |    Справочник.Товар КАК Товар";
   Выборка=Запрос.Выполнить().Выбрать();
   Пока Выборка.Next() Цикл
       Сообщить(Выборка.Наименование);
   КонецЦикла;    



В таком виде выдавал ошибку
15 Yorik
 
06.08.12
16:55
правда через comconnector делал....тоже
16 Yorik
 
06.08.12
17:14
...БЛЛЛИИН ...все разобрался
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан