|
|
|
VFP и с8
|
|||
|---|---|---|---|
|
#18+
авторColumnsCount = Res.Колонки.Количество() - дает ошибку OLE правильно, что выдаёт ошибку... я же написал, когда и как надо использовать методы Выбрать() и Выгрузить()... если ты используешь метода Выбрать(), то объекта типа "колонка" у результата выборки нет и использовать Колонки.Количество() нельзя... такую конструкцию можно использовать только при выгрузки данных в таблицу значений (это такой объект есть в 1С), т.е. если используешь метод Выгрузить() и если используешь метод Выбрать(), то лучше используй цикл типа DO WHILE oRes.Следующий(), а не FOR ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 03.04.2009, 09:03 |
|
||
|
VFP и с8
|
|||
|---|---|---|---|
|
#18+
и чего-то ты темнишь ;) такое впечатление, что ты сюда выкладываешь не тот код, который используешь в проге, а не вырезанносокращённоупрощеннодоработанный ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 03.04.2009, 09:26 |
|
||
|
VFP и с8
|
|||
|---|---|---|---|
|
#18+
Большое спасибо. Ничего не темню. Работает код set step on obj = CreateObject("V8.Application") obj.Connect('File="D:\Documents and Settings\1C\Enterprise";Usr="Польз"') oQue = obj.NewObject("Запрос") Дата1={^2007-01-01 00:00:00} Дата2={^2007-12-31 23:59:59} oQue.УстановитьПараметр("ДатаНач", Дата1) oQue.УстановитьПараметр("ДатаКон", Дата2) oQue.Текст = "ВЫБРАТЬ Дата,Номер,СуммаДокумента ИЗ Документ.ПоступлениеТоваровУслуг ГДЕ Дата между &ДатаНач и &ДатаКон" Res = oQue.Выполнить().Выбрать() RowsCount = Res.Количество() *ColumnsCount = Res.Колонки.Количество() do while res.Следующий() ? Res.Номер+" "+str(Res.СуммаДокумента)+" "+str(Res.СуммаДокумента) ENDdo obj.Exit() **ENDIF RELEASE obj **SELECT bDocs **BROWSE NORMAL Изыски продолжу в Понедельник. Буду разбираться с датами ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 03.04.2009, 09:50 |
|
||
|
VFP и с8
|
|||
|---|---|---|---|
|
#18+
по датам я уже сказал как лучше сделать: предоставь лучше право определять начало и конец дня самой 1С (см. выше), а из фокса передавай в 1С даты в привычном для фокса виде... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 03.04.2009, 10:55 |
|
||
|
VFP и с8
|
|||
|---|---|---|---|
|
#18+
Соединение с 1с на локальном компе проходило, теперь пытаюсь подключиться к серверу obj.Connect('Srvr="SERVAK";Ref="UPP_TEST"') Не дает , пишет типа "Information base not found, creatr new? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.05.2009, 07:56 |
|
||
|
|
start [/forum/topic.php?fid=41&gotonew=1&tid=1586495]: |
0ms |
get settings: |
8ms |
get forum list: |
12ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
114ms |
get topic data: |
10ms |
get first new msg: |
7ms |
get forum data: |
2ms |
get page messages: |
50ms |
get tp. blocked users: |
1ms |
| others: | 15ms |
| total: | 225ms |
| 0 / 0 |
