COMOfficeDocument_RU как дождаться конца работы в документе?

[Roman. ~RVS]

Задача вот какая: создаётся из под аксапты документ, после чего в аксапте нужно дождаться окончания работы в офисном документе и продолжить выполнение своего кода.

делал бесконечным циклом со sleep(100); и с выходом по условию, что m_ComApplication.toString() == "" или m_ComDocument.toString() == "".

для вордовых документах это как-то работает, но на экселе - нет. это условие срабатывает, когда редактируешь ячейку. (на каком-то из офисов это срабатывало и в ворде при нажатии на крестик, когда выводился запрос о сохранении - бред какой-то, простите)

проверка на существование ссылок на самих com-объектов тоже ничего хорошего не дала - даже после закрытия документа оно продолжает куда-то ссылаться (хоть там уже и методов нет), в null не сбрасывается.

может кто с подобным сталкивался? или идеи какие?...

[Gad]

Цитата:

Изначально опубликовано Roman. ~RVS
Задача вот какая: создаётся из под аксапты документ, после чего в аксапте нужно дождаться окончания работы в офисном документе и продолжить выполнение своего кода.

Я наверное чего то не понимаю, но в чем проблема. Пишите код вывода в Office, за ним дальнейший код.

[Gad]

X++
ComExcelDocument excel;
;

try
{
excel = new ComExcelDocument();
excel.newFile(Template, false);

excel.insertValue(ComExcelDocument_RU::numToNameCell(1, 2), value1);
excel.insertValue(ComExcelDocument_RU::numToNameCell(3, 4), value2);
excel.insertValue(ComExcelDocument_RU::numToNameCell(5, 6), value3);

excel.visible(true);
excel.finalize();
}
catch (Exception::Error)
{
excel.closeDocument();
excel.finalize();
}
//Код который исполняется после вывода

[Ace of Database]

Я так понял, Вам в аксапте надо узнать, когда пользователь закрыл документ ворда или экселя.
Надо ловить событие Document_Close() у COM-объекта Application для ворда и событие Application.WorkbookBeforeClose() у COM-объекта Application для экселя.
Нужно копать в этом направлении.
Я лично в Аксапте еще ни разу event'ы от COM-объектов не перехватывал.

[Roman. ~RVS]

Поясняю:
нужно дождаться, пока пользователь поработает с документом и внесёт в него какие-нибудь изменения.

у меня ещё остаётся запасной вариант (некрасивый, тормозной, и я его не пробовал):
- создать документ, всё в него внести,
- сохранить
- снова открыть через командную строку с помощью сформированного специально для этого .bat файла, в котором будет файловая сигнализация, что документ отработал.

нужно такую вещь для создания документов, в которые пользователь может вносить произвольные исправления и последующего АВТОМАТИЧЕСКОГО складирования этих самых документов.

[Roman. ~RVS]

Цитата:

Изначально опубликовано Ace of Database
Я так понял, Вам в аксапте надо узнать, когда пользователь закрыл документ ворда или экселя.
Надо ловить событие Document_Close() у COM-объекта Application для ворда и событие Application.WorkbookBeforeClose() у COM-объекта Application для экселя.
Нужно копать в этом направлении.

Отлично! мысль-то хорошая, а как?! Я бы с радостью покопался, да у меня даже идей нет, как привязать к комовскому событию какой-нибудь метод аксапты...

[monk]

В Axapta есть ActiveX, который позволяет отображать документы Excel в форме Axapta.
Может это подойдет

[belugin]

Наверное, события без формы не получатся:
http://erpkb.com/Axapta/PoluchenieUv...shnixSobytijax

(либо надо делать адаптер, который будет пихать события в некоторую очередь и поток, который очередь будет просматривать)

[Roman. ~RVS]

Цитата:

Изначально опубликовано monk
В Axapta есть ActiveX, который позволяет отображать документы Excel в форме Axapta.
Может это подойдет

Хм. Мрачно просмотрел все доступные ActiveX - не нашел. Ввел руками Word.Application - повалил аксапту...

[Hezl]

Посмотрите форму RAssetDocuments

[sukhanchik]

События можно точно перехватить в ActiveX - см метод формы controlMethodOverload
и форму SysHelp.

[Roman. ~RVS]

Цитата:

Изначально опубликовано sukhanchik
События можно точно перехватить в ActiveX - см метод формы controlMethodOverload
и форму SysHelp.

Это-то понятно. только вот вставлять в аксаптовскую форму документ как-то не очень красиво получается, с учетом, что это делается через ActiveX эксплорера (как мне посоветовали посмотреть в RAssetDocuments) - чисто word или excel доумента в ActiveX нет. А это не то, всё-таки. нет там полноофисного функционала. Да и при каждом открытии диалог выводится, что "многие файлы могут повредить...." и т.д...

в общем, пока подзабил на это дело - не до того. просто в методе ожидания, пока отработает документ вставил вопрос, типа если пользователь доработал в документе, то после того, как он это сделал, в аксапте он жмёт батон и процесс идёт дальше.

тоже не красиво, но хоть как-то работает. 8-)

[Roman. ~RVS]

и всё-таки может ещё у кого-нибудь какие-то мысли?

второй вариант: можно отслеживать, что файл документа сужествует и что он занят другим процессом. как только файл освободился - работа закончена.

да вот только WinAPI::isFileExist(_fn) говорит, что файла НЕТ, не смотря на то, что он ЕСТЬ, но ЗАНЯТ.

что я делаю не так?

пойти покурить исходники WinAPI?

[Roman. ~RVS]

WinAPI::fileExist_RU ведёт себя таким же образом - говорит, что файла нет, если он занят.

в общем, использовал WinAPI::fileLocked() - работа его меня удовлетворила.

[metal]

Может быть пойти другим путем? Например, не из аксапты отслеживать закрытие офисовского документа, а из этого самого документа по его закрытию дернуть аксапту через ком и сказать ей что документ такой-то юзером изменен и закрыт.

Это просто абстрактная идея. Я таким не занимался.

[blokva]

В свое время тоже стояла такая задача, решил следующим методом в Global :

PHP код:

static int RunWait(str _fileName)
{
    container   fileName;
    COM           wsh = new COM("WScript.Shell.1");
    str               fileExt;
    int               ret = -1;
    ;

    fileName = str2con(_fileName, '.');
    fileExt = conpeek(fileName, conlen(fileName));
    if ((fileExt == "DOC") || (fileExt == "DOT"))
    {
        ret = wsh.Run('winword.exe ' + '"' + _fileName + '"', 1, True);
    }
    if (fileExt == "XLT")
    {
        ret =  wsh.Run('excel.exe ' + '"' + _fileName + '"', 1, True);

    }
    return ret;
} 


в версии 2.5 работало почему-то через раз, в версии 3 не пробывал!