ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / 1С [игнор отключен] [закрыт для гостей] / Подключение к 8.2 из 77 по OLE
9 сообщений из 9, страница 1 из 1
Подключение к 8.2 из 77 по OLE
    #37962585
VVA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VVA
Гость
Пытаюсь подключиться к 8.2 из 77 при помощи OLE, как выполнить подключение вроде разобрался:

Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
V82 = СоздатьОбъект("V82.COMConnector");
СтрПодкл="srvr=""tabularasa"";ref=""Belicer"";usr="""";pwd="""";";
Попытка
	Соединение=V82.Connect(СтрПодкл);
	Сообщить("Вроде как!");
Исключение
	Сообщить(ОписаниеОшибки());
КонецПопытки;



А вот как теперь до данных 8ки добраться???
Пробовал так:

Код: sql
1.
2.
3.
4.
5.
СпрОрг=Соединение.Справочники.Организации;
СпрОрг.ВыбратьСтроки();
Пока СпрОрг.ПолучитьСтроку()=1 Цикл
	Сообщить(СпрОрг.Наименование);
КонецЦикла;



Ругается: Поле агрегатного объекта не обнаружено (ВыбратьСтроки).

Помогите плиз, направьте в нужное русло...
...
Рейтинг: 0 / 0
18.09.2012, 16:20
| Ответить | Цитировать | Написать  
Подключение к 8.2 из 77 по OLE
    #37962674
DmitriyZ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DmitriyZ
Участник
VVA, примерно так:
Код: pascal
1.
2.
3.
4.
5.
 
Выборка = Соединение.Справочники.Организации.Выбрать();
Пока Выборка.Следующий() Цикл
      .....обработка............
КонецЦикла;
...
Рейтинг: 0 / 0
18.09.2012, 17:03
| Ответить | Цитировать | Написать  
Подключение к 8.2 из 77 по OLE
    #37962766
VVA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VVA
Гость
DmitriyZ,

Попробовал сделать так:

Код: sql
1.
2.
3.
4.
Выборка = Соединение.Справочники.Организации.Выбрать();
Пока Выборка.Следующий() Цикл
  	Сообщить("Наименование : "+Выборка.Наименование);  
КонецЦикла;



Ругнулся на строку Пока Выборка.Следующий() <<?>>Цикл , Выражение должно иметь логический тип.

Исправил на:
Код: sql
1.
2.
3.
4.
Выборка = Соединение.Справочники.Организации.Выбрать();
Пока Выборка.Следующий()=1 Цикл
  	Сообщить("Наименование : "+Выборка.Наименование);  
КонецЦикла;



Теперь вообще в цикл не заходит(((
...
Рейтинг: 0 / 0
18.09.2012, 17:50
| Ответить | Цитировать | Написать  
Подключение к 8.2 из 77 по OLE
    #37962773
VVA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VVA
Гость
Понял просто надо не 1 , а -1 и усе заработало!

Спасибо!
...
Рейтинг: 0 / 0
18.09.2012, 17:54
| Ответить | Цитировать | Написать  
Подключение к 8.2 из 77 по OLE
    #37962779
Kreontsa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kreontsa
Участник
Через ОЛЕ Истина <> 1, ЛОЖЬ <> 0 и т.п.
Забыл что-чему равно, проверь на "-1" вроде это будет ИСТИНА.
...
Рейтинг: 0 / 0
18.09.2012, 17:57
| Ответить | Цитировать | Написать  
Подключение к 8.2 из 77 по OLE
    #37965103
VVA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VVA
Гость
Kreontsa,

Если использовать <>1 то цикл бесконечным становится, а вот с <>0 нормально работает и с -1 тоже нормально.
...
Рейтинг: 0 / 0
20.09.2012, 09:56
| Ответить | Цитировать | Написать  
Подключение к 8.2 из 77 по OLE
    #38069478
VVA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VVA
Гость
Помогите люди добрые!

С подключением все ок! Понаписал уже кучу синхронизаций.

Но есть проблемка если соединение длится дольше 3х минут, то по окончанию работы 7ка вылетает по ошибке "Память по такомуто адресу не читается"(((

Как от этого избавиться(((
...
Рейтинг: 0 / 0
07.12.2012, 12:49
| Ответить | Цитировать | Написать  
Подключение к 8.2 из 77 по OLE
    #38070251
rigus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rigus
Участник
Это с 8.2. пошло с коннектом (В 8.1. не отваливалось)
Лечится примерно так перед обращение к объекту 8ки в попытке пытаемся обратиться к 8ке если все ок то выполняем действие если нет то реконнект. Что то типа такого только обернуть в функцию или процедуру.

Попытка
Соединение.Справочники.Организации.ПустаяСсылка();
Исключение
V82 = СоздатьОбъект("V82.COMConnector");
СтрПодкл="srvr=""tabularasa"";ref=""Belicer"";usr="""";pwd="""";";
Попытка
Соединение=V82.Connect(СтрПодкл);
Сообщить("Вроде как!");
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
конецпопытки;
...
Рейтинг: 0 / 0
07.12.2012, 17:47
| Ответить | Цитировать | Написать  
Подключение к 8.2 из 77 по OLE
    #38071944
VVA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VVA
Гость
rigus,
идея то понятная, сокротить время подключения...
но мне она к сожалению не подходит, у меня большая обработка синхронизации баз с пользовательским интерфейсом, если я такое сделаю пользователи вместо 10-20 минут работы с обработкой будут в ней более часа проводить(((

Нет ли какого нить способа без сокращения времени коннекта?
...
Рейтинг: 0 / 0
10.12.2012, 10:00
| Ответить | Цитировать | Написать  
9 сообщений из 9, страница 1 из 1
Форумы / 1С [игнор отключен] [закрыт для гостей] / Подключение к 8.2 из 77 по OLE
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]