File.Run("subst.exe", "w: .", _SourceFolder, SW_MINIMIZE, true);
Application.Sleep(500);



if File.DoesExist("w:\\xsas.exe") then

if HTTP.TestConnection("http://127.0.0.1", 1, 80, nil, nil) then
Audio.Load(CHANNEL_BACKGROUND, "autoplay\\audio\\robo.ogg", true, false);
Dialog.Message("Notice", "Port 80 already in use.");
else
if File.DoesExist("w:\\usr\\local\\apache2\\bin\\apache.exe") then
File.Run("w:\\usr\\local\\apache2\\bin\\apache.exe", "-f w:\\usr\\local\\apache2\\conf\\httpd.conf -d w:\\usr\\local\\apache2\\", "w:\\usr\\local\\apache2\\", SW_MINIMIZE, false);
else
--
end
end



if HTTP.TestConnection("http://127.0.0.1", 1, 3306, nil, nil) then
Audio.Load(CHANNEL_BACKGROUND, "autoplay\\audio\\robo.ogg", true, false);
Dialog.Message("Notice", "Port 3306 already in use.");
else
if File.DoesExist("w:\\usr\\local\\mysql\\bin\\mysqld-opt.exe") then
File.Run("w:\\usr\\local\\mysql\\bin\\mysqld-opt.exe", "--defaults-file=my-small.cnf", "w:\\usr\\local\\mysql\\bin\\", SW_MINIMIZE, false);
else
--
end
end

Audio.Load(CHANNEL_BACKGROUND, "autoplay\\audio\\windows_vista_hardware_insert.ogg", true, false);
Application.Restore();


else
Audio.Load(CHANNEL_BACKGROUND, "autoplay\\audio\\robo.ogg", true, false);
File.Run("subst.exe", "/d w:", "", SW_MINIMIZE, true);
end