Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
reaque
Зарегистрирован: 18.09.2015 Сообщения: 9
|
Добавлено: Пт Окт 28, 2016 08:40 Заголовок сообщения: Запустить отчет минуя интерфейс. |
|
|
Есть самописный отчет на Z-языке выгрузки данных в Excel.
Сохраняем скрипт как файл. Запускаю его на выполнение с помощью zexec.exe. Но окно открытия/сохранения сформировавшегося файла не появляется. Процедура успешно выполняется и закрывается, не выдавая мне отчета. Как вызвать диалоговое окно сохранения или автоматически сохранить сгенерированный файл по какому-либо пути?
Основные используемые команды в Z-процедуре:
Код: |
import m_Excel;
{
m_Excel.Init(sid);
ins_Excel(sid, 2, 5, "c "+dfrom);
m_Excel.ActivateWorkSheet("Лист1");
ins_Excel(sid, i, 1, r1);
return 0;
}
|
|
|
Вернуться к началу |
|
![](templates/subSilver/images/spacer.gif) |
reaque
Зарегистрирован: 18.09.2015 Сообщения: 9
|
Добавлено: Пн Окт 31, 2016 16:14 Заголовок сообщения: |
|
|
В TXT получается писать через fopen.
Как записать что-нибудь в Excel и сохранить файл на сервере?
Пробовали так:
Код: | sput(str,"ActiveWorkbook.SaveAs Filename=\"D:\\123.xls\";");
m_Excel.VBScript(str); |
Не прокатывает. |
|
Вернуться к началу |
|
![](templates/subSilver/images/spacer.gif) |
reaque
Зарегистрирован: 18.09.2015 Сообщения: 9
|
Добавлено: Вт Ноя 01, 2016 10:43 Заголовок сообщения: |
|
|
Есть команда, копирующая готовый файл "на клиента":
Код: | m_Excel.SaveFileToClient("D:\\111.XLS","D:\\222.XLS"); |
А какой командой сохранить перед этим файл на сервере??
Пробовал
Код: | m_Excel.Save
m_Excel.SaveAs
m_Excel.SaveFile
m_Excel.SaveFileAs
m_Excel.SaveFileToServer |
ни одна не сработала. |
|
Вернуться к началу |
|
![](templates/subSilver/images/spacer.gif) |
wolf159
Зарегистрирован: 10.10.2019 Сообщения: 1
|
Добавлено: Чт Окт 10, 2019 11:44 Заголовок сообщения: |
|
|
reaque писал(а): | В TXT получается писать через fopen.
Как записать что-нибудь в Excel и сохранить файл на сервере?
Пробовали так:
Код: | sput(str,"ActiveWorkbook.SaveAs Filename=\"D:\\123.xls\";");
m_Excel.VBScript(str); |
Не прокатывает. |
Спасибо большое за пример, очень помог! |
|
Вернуться к началу |
|
![](templates/subSilver/images/spacer.gif) |
|