# Kod zatrzymuje i uruchamia okrelon witryn WWW

use Win32::OLE;
$Win32::OLE::Warn = 3;

# ------ KONFIGURACJA SKRYPTU ------
$strComputer = '<NazwaSerwera>'; # np. web01.rallencorp.com
$strPath = '<ciekaUsugiSerweraIIS>'; # np. W3SVC/1
# ------ KONIEC KONFIGURACJI ---------
$objIIS = Win32::OLE->GetObject('IIS://' . $strComputer . '/' . $strPath);

$objIIS->Stop();
print "Witryna WWW $strComputer/$strPath z powodzeniem zostaa zatrzymana.\n";

$objIIS->Start();
print "Witryna WWW $strComputer/$strPath z powodzeniem zostaa uruchomiona.\n";
