Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Приручаю ReportListener / 15 сообщений из 15, страница 1 из 1
27.11.2008, 15:30
    #35679580
Vas_i_lisa
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
Доброго времени суток !
Перехожу на 9.0. Все нормально получилось.
Хочу один отчет выводить в HTML.

В стартовом модуле пишу :

SET REPORTBEHAVIOR 90
_REPORTPREVIEW = HOME()+"ReportPreview.app"
_REPORTOUTPUT = HOME() + "ReportOutput.app"


В кнопке вывода отчета :

loListener = .NULL.
do (_reportoutput) WITH 5, loListener

loListener.TargetFileName = rab+'MyReport.html'
loListener.QuietMode = .T.
report form system\otchet33.frx object loListener

o=CreateObject("hyperlink")
o.NavigateTo(rab+"MyReport.html")

На машинах, где установлен ФОКС, все проходит отлично, и при запуске из среды, и при запуске ЕХЕ.

На машине пользователя, где нет фокса, при запуске ЕХЕ на строках

_REPORTPREVIEW = HOME()+"ReportPreview.app"
_REPORTOUTPUT = HOME() + "ReportOutput.app"

выдает ошибку : Data type mismatch.

Все необходимые библиотеки у пользователя установлены : vfp9r.dll, vfp9t.dll, vfp9renu.dll
ReportOutput.app, ReportPreview.app

Если ставлю wait wind home() - выдает верный путь.

Чего еще не хватает для полного счастья ?
...
Рейтинг: 0 / 0
27.11.2008, 15:33
    #35679590
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
поиском по форуму
sys(5)+sys(2003)
sys(16)
...
Рейтинг: 0 / 0
27.11.2008, 15:35
    #35679600
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
ReportPreview.app
ReportOutput.app
кладете в каталог с исполняемым файлом

_REPORTPREVIEW = путь_откуда_запустили_исполняемый_файл+"ReportPreview.app"
...
Рейтинг: 0 / 0
27.11.2008, 15:56
    #35679706
Vas_i_lisa
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
Все это уже опробовано.
И sys(5)+sys(2003).
И _REPORTPREVIEW = путь_откуда_запустили_исполняемый_файл+"ReportPreview.app"

Результат тот же.

Еще так пробовала :
do (путь_где_лежит_ReportOutput+"ReportOutput.app") WITH 5, loListener
Не помогает. Вообще пишет - Too many variables

В конфиге прописано MVCOUNT=65000
...
Рейтинг: 0 / 0
27.11.2008, 16:00
    #35679722
Vas_i_lisa
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
Почему-то после присвоения _REPORTPREVIEW = HOME()+"ReportPreview.app"
когда задаю type("_REPORTPREVIEW") возвращает U.

невозможность выявить тип заданного выражения ????????
...
Рейтинг: 0 / 0
27.11.2008, 16:19
    #35679807
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
давайте так напишем
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
IF FILE("reportpreview.app", 1 ) and FILE("reportoutput.app", 1 )
	_REPORTPREVIEW=fullpath("reportpreview.app")
	_REPORTOUTPUT=fullpath("reportoutput.app")
	set reportbehavior  90 
ELSE
	_REPORTPREVIEW=""
	_REPORTOUTPUT=""
	SET REPORTBEHAVIOR  80 
ENDIF

if !empt(_REPORTOUTPUT)
   ...
...
Рейтинг: 0 / 0
27.11.2008, 16:27
    #35679837
Aleksey-K
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
На машинах пользователей файлы ReportPreview.app и пр. при правильной инсталляции должны лежать в HOME() (C:\Program Files\Common Files\Microsoft Shared\VFP)
У меня один из этих файлов исправлен (ReportPreview.app), т.к. исходный обрезал имя отчета при его сохранении в ресурсном файле и, следовательно, не восстанавливал положения при просмотре. Плюс там еще была ошибка с учетом размером окна Preview.
Поэтому, свой сообстенный ReportPreview.app я "кладу" в папку APP корня приложения и при запуске делаю настройку:
_REPORTPREVIEW = SYS(5) + CURDIR() + "APP\ReportPreview.app"
Если вы меняете стандартный путь для этих app, то скорректируйте переменные _REPORTPREVIEW и REPORTOUTPUT
У вас:
_REPORTPREVIEW = HOME()+"ReportPreview.app"
_REPORTOUTPUT = HOME() + "ReportOutput.app"
Но HOME() в exe-нике возвратит C:\Program Files\Common Files\Microsoft Shared\VFP

С уважением, Алексей
...
Рейтинг: 0 / 0
27.11.2008, 17:31
    #35680090
Vas_i_lisa
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
прошелмимо , попробовала Ваш вариант. Чуть изменила - вставила WAIT WIND для точности:

WAIT WINDOW '0'

WAIT WINDOW FILE("reportpreview.app",1)
WAIT WINDOW FILE("reportoutput.app",1)

IF FILE("reportpreview.app",1) and FILE("reportoutput.app",1)
_REPORTPREVIEW=fullpath("reportpreview.app")
WAIT WINDOW '1'
_REPORTOUTPUT=fullpath("reportoutput.app")
WAIT WINDOW '2'
set reportbehavior 90
ELSE
_REPORTPREVIEW=""
WAIT WINDOW '3'
_REPORTOUTPUT=""
WAIT WINDOW '4'
SET REPORTBEHAVIOR 80
ENDIF

Результат выполнения :
"0"
".Т."
".Т."
"Data type mismatch"
"1"
"Data type mismatch"
"2"

М.б, это из-за того, что там Windows2000 ?
Пыталась на двух машинах. Файлы .арр бросала в каталог задачи.
Завтра попробую на той, где ХР.


Aleksey-K
Насколько помню, мне WAIT WINDOW HOME() возвращал C:\WINNT\System32


В любом случае ВСЕМ СПАСИБО за попытку помочь.
...
Рейтинг: 0 / 0
28.11.2008, 12:48
    #35681666
Vas_i_lisa
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
Продолжаю бороться с ReportListener
На машинах пользователей явно не хватает какой-то библиотеки.
Фокс 8 работал без проблем.
При переходе на 9.0 сбросила или обновила :
1. msvcr70.dll
2. mscomct2.ocx
3. gdiplus.dll
4. msvcr71.dll
5. vfp9r.dll
6. vfp9t.dll
7. vfprenu.dll
8. ReportOutput.app
9. ReportPreview.app


Что еще надо ?
...
Рейтинг: 0 / 0
28.11.2008, 13:03
    #35681719
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
2 Vas_i_lisa

зачем Вы руками расскидываете рантайм?
Вас инсталлшилд не устраивает?
...
Рейтинг: 0 / 0
28.11.2008, 13:12
    #35681749
Vas_i_lisa
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
прошелмимо,

Как-то так повелось в нашем королевстве.... (в смысле - в отделе).
ну, попробую приручить инсталлшилд.
...
Рейтинг: 0 / 0
28.11.2008, 13:25
    #35681806
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
что там указать разберитесь самостоятельно,
либо подскажу
...
Рейтинг: 0 / 0
28.11.2008, 17:54
    #35682776
Vas_i_lisa
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
Продолжаю разговор.
Инсталлшилд не использовали, т.к. задача на машине уже была установлена, только написана на 8.0.
(При переходе с пятерки на 8.0 я тоже не делала инсталяшку, только добавила библиотеки, все нормально пошло.)

Сделала инсталяшку для 9.0, запустила. И вот что выяснилось.
У нас на фирме жесткое разделение прав для пользователей. Даже для установки инсталляции мне потребовалось загрузиться с правами администратора.
Так вот, под АДМИНОМ - ВСЕ РАБОТАЕТ !
Загружаюсь как пользователь - все рубится.
Как я понимаю, пользователю не хватает прав на изменение _REPORTPREVIEW и _REPORTOUTPUT.

прошелмимо , большое Вам спасибо за идею с инсталлшилд - без нее мне бы не пришло в голову загрузиться как АДМИН. Успехов во всем.
...
Рейтинг: 0 / 0
28.11.2008, 18:01
    #35682808
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
авторЗагружаюсь как пользователь - все рубится

проверьте права пользователей на каталоги на запись/чтение
если нет необходимых прав, то дайте

под админом есть права, и вы создали каталоги под админом
дайте такие-же права обычному пользователю
...
Рейтинг: 0 / 0
28.11.2008, 18:03
    #35682814
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Приручаю ReportListener
авторУспехов во всем.

Спасибо. гы, 350 м не дошел до Кремля. стараюсь.
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Приручаю ReportListener / 15 сообщений из 15, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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