Jak obsłużyć plik .msi w programie Inno Setup?

Question

Mam następujący kod z Inno Setup.

Ale jak mogę zastosować tę podobną funkcję do pliku .msi?

msiexec /I "\package\file.msi" /qb? W jaki sposób?

procedure AfterMyProgInstall(S: String); 
var 
    ErrorCode: Integer; 
begin 
    {MsgBox('Please wait the libraries are getting installed, ' + 
      'without the libraries it wont work.', mbInformation, MB_OK);} 
    ExtractTemporaryFile(S); 
    {SW_SHOW, SW_SHOWNORMAL, SW_SHOWMAXIMIZED, SW_SHOWMINIMIZED, SW_SHOWMINNOACTIVE, SW_HIDE} 
    ShellExec('', ExpandConstant('{app}\package\' + S), '', '', SW_SHOWNORMAL, 
      ewWaitUntilTerminated, ErrorCode); 
end; 

Answer 1

Spróbuj tego:

ShellExec('', 'msiexec.exe', 
    ExpandConstant('/I "{tmp}\package\file.msi" /qb'), 
    '', SW_SHOWNORMAL, ewWaitUntilTerminated, ErrorCode); 

Lub:

[Files] 
Source: file.msi; DestDir: {tmp}; Flags: deleteafterinstall; 

[Run] 
Filename: "msiexec.exe"; Parameters: "/i ""{tmp}\file.msi"" /qb"; WorkingDir: {tmp}; 

Answer 2

Uwaga że: Używam Inno Setup 5.5.3 na Windows 7, i że to jest kod dla skryptu instalacyjnego Inno w sekcji uruchamiania. Za pomocą tego kodu można bez problemu uruchamiać pliki msi. Oto kod:

[Run] 
Filename: `{src}\PhysX.msi;` Description: Nvidia PhysX; Verb: open; Flags: shellexec postinstall waituntilterminated runascurrentuser skipifsilent 

Answer 3

W oparciu o odpowiedź udzieloną przez @kobik. Musiałem dołączyć ".exe" w nazwie pliku. tak:

if not ShellExec('', 'msiexec.exe', ExpandConstant('{tmp}\package\file.msi'), 
    '', SW_SHOWNORMAL, ewWaitUntilTerminated, ErrorCode) 
then 
    MsgBox('Msi installer failed to run!' + #13#10 + ' ' + 
    SysErrorMessage(ErrorCode), mbError, MB_OK);