|
Не могу подключиться к 81 из 77... вроде все верно написано!
| ☑ |
0
Stagor
06.09.11
✎
15:00
|
V81 = CreateObject("V81.Application");
Попытка
База = V81.Connect("File=C:\Developer;Usr=Иванов");
Исключение
Сообщить("База не открыта!!!");
Возврат;
КонецПопытки;
в итоге
База = -1
|
|
1
ЧеловекДуши
06.09.11
✎
15:04
|
А где пароль?
|
|
2
ЧеловекДуши
06.09.11
✎
15:05
|
Оле зло, лучше используй промежуточные файлы, так устойчивей все работает.
|
|
3
Stagor
06.09.11
✎
15:05
|
Пароля нет
|
|
4
Stagor
06.09.11
✎
15:05
|
(2) Заказчик хочет "прямо из базы"
|
|
5
Kreont
06.09.11
✎
15:06
|
(0) V81=СоздатьОбъект("V81.COMConnector");
|
|
6
GreyAngel
06.09.11
✎
15:10
|
По моему все же Usr='Иванов'.
|
|
7
Stagor
06.09.11
✎
15:12
|
(5) Сработало
|
|
8
Stagor
06.09.11
✎
15:16
|
только прочитать документы из 8-ки не могу
|
|
9
Kreont
06.09.11
✎
15:24
|
Запросом пример:
Запрос = База.NewObject("Запрос");
Запрос.Текст="ВЫБРАТЬ
|ПоступлениеТоваровУслугТовары.Ссылка КАК Док
|ПоступлениеТоваровУслугТовары.Ссылка.СуммаДокумента КАК Сумма,
|ИЗ
|Документ.ПоступлениеТоваровУслуг.Товары КАК ПоступлениеТоваровУслугТовары
|ГДЕ
|ПоступлениеТоваровУслугТовары.Ссылка.Дата МЕЖДУ &Дата1 И &Дата2";
Запрос.УстановитьПараметр("Дата1",НачДата);
Запрос.УстановитьПараметр("Дата2",КонДата+1);
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий()=-1 Цикл
// Ну тут даже так можно:
НомерДок = СокрЛП(Выборка.Док.Номер);
ДатаДок = Дата(Выборка.Док.Дата);
КодКлієнта = СокрЛП(Выборка.Док.Контрагент.Код);
ЗагальнаСума = Число(Выборка.Сумма);
и т.д.
КонецЦикла;
|
|
10
ptiz
06.09.11
✎
15:24
|
и так можно
База = CreateObject("V81.Application");
Попытка
База.Connect("File=C:\Developer;Usr=Иванов");
Исключение
Сообщить("База не открыта!!!");
Возврат;
КонецПопытки;
|
|
11
Kreont
06.09.11
✎
15:26
|
(10) Только по времени запуска будет намного дольше работать )
|
|
12
Stagor
06.09.11
✎
15:28
|
Спасибо! Не знал, что Истина в 81 это -1 в 77 :)
|
|