Instalacja serwera Apache w trybie cichym w Installshield

Funkcja Instaluje Serwer Apache w trybie cichym.
Parametry:
- szPlik - Plik instalatora msi
- szPort - Port na którym serwer Apache ma prowadzić nasłuch
- szService - nazwa serwisu Apache
- bLog - zapisywanie wyniku do pliku log
Wartości zwracane: false/true

function BOOL InstallApacheServer(szPlik, szPort, szService, bLog)
string szParams;
BOOL bResult;
number nResult;
begin
 bResult = FALSE; 
 if (bLog) then WriteLog(0,"* Instalacja serwera Apache..."); endif;  
 szParams = " /i \""+szPlik+"\" /passive /l \""+TARGETDIR ^ "apache_install.log\"
 SERVERADMIN=admin@localhost SERVERPORT="+szPort;
 if (LaunchApplication(WINSYSDIR ^ "msiexec.exe", szParams, "" , SW_HIDE, 0, 
LAAW_OPTION_USE_SHELLEXECUTE | LAAW_OPTION_WAIT | LAAW_OPTION_SHOW_HOURGLASS )<0) then
  WriteLog(2,"Błąd: Nie można zainstalować serwera Apache ");
     MessageBox ("Nie można zainstalować Serwera Apache", SEVERE);
    else
     while ((!(Is(FILE_EXISTS, TARGETDIR ^ "apache_install.log"))) || 
( (Is(FILE_EXISTS, TARGETDIR ^ "apache_install.log"))&&
(Is(FILE_LOCKED,TARGETDIR ^ "apache_install.log")) )  );
      Sleep(200);
     endwhile;
     bResult = TRUE;                
     if (bLog) then WriteLog(2,"-zainstalowano serwer, nasłuch na porcie:"+szPort+""); endif;
    endif; 
 return bResult;
end;