ShellExecute on x64 server

[titov]

WScript.Shell - попробуйте. Взято отсюда
Как разархивировать zip архив?

[Beast-L]

А чем вызвать скрипт? ShellExecute штатный не работает.

[gl00mie]

Цитата:

Сообщение от Beast-L

ShellExecute штатный не работает.

Во-первых, он не штатный - это ваша доделка. Во-вторых, эта тема проскакивала в блогах:

Цитата:

Background of this issue is that on 64bit the DLLFunction kernel class itself is not implemented in Dynamics AX 2009.

Так что забудьте про Win32 API при работе в AX 2009 на сервере.

Цитата:

Сообщение от Beast-L

Решилось написанием Class Library на c#, оттуда вызов shellexecute. Пока лучше решения не нашел.

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

[Beast-L]

Цитата:

Сообщение от gl00mie

Во-первых, он не штатный - это ваша доделка. Во-вторых, эта тема.

WinAPI::ShellExecute это не моя доделка, а стандартный функционал. Мой ShellExecute через .net работает вполне нормально.

[titov]

Цитата:

Сообщение от Beast-L

А чем вызвать скрипт? ShellExecute штатный не работает.

static void ReturnCode_Job(Args _args)
{
COM    wsh             = new COM('WScript.Shell');
int        returnCode1 = -1;
int        returnCode2 = -1;
int        errorCode1 = -1;
int        errorCode2 = -1;
;
 
    returnCode1 = wsh.Run('winrar.exe e -y C:\\1.zip C:\\1\\', 1, true);
    errorCode1 = WinAPI::getLastError();
 
    returnCode2 = wsh.Run('winrar.exe e -y C:\\2.zip C:\\2\\', 1, true);
    errorCode2 = WinAPI::getLastError();
 
    info(strFmt('1.zip: ReturnCode = %1, ErrorCode = %2', returnCode1, errorCode1));
    info(strFmt('2.zip: ReturnCode = %1, ErrorCode = %2', returnCode2, errorCode2));
 
    wsh.finalize();
 
return;
}

код из ссылки, которую я привел

[Beast-L]

Цитата:

Сообщение от titov

static void ReturnCode_Job(Args _args)
{
COM    wsh             = new COM('WScript.Shell');
int        returnCode1 = -1;
int        returnCode2 = -1;
int        errorCode1 = -1;
int        errorCode2 = -1;
;
 
    returnCode1 = wsh.Run('winrar.exe e -y C:\\1.zip C:\\1\\', 1, true);
    errorCode1 = WinAPI::getLastError();
 
    returnCode2 = wsh.Run('winrar.exe e -y C:\\2.zip C:\\2\\', 1, true);
    errorCode2 = WinAPI::getLastError();
 
    info(strFmt('1.zip: ReturnCode = %1, ErrorCode = %2', returnCode1, errorCode1));
    info(strFmt('2.zip: ReturnCode = %1, ErrorCode = %2', returnCode2, errorCode2));
 
    wsh.finalize();
 
return;
}

код из ссылки, которую я привел

Метод "Run" в COM-объекте класса "WScript.Shell" возвратил код ошибки 0x80070002 (<неизвестно>), который означает: <неизвестно>.