Code:
strComputer = "."
strProcessKill = "'iw4mp.exe'"
Set WshShell = CreateObject("WS*****.Shell")
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _
& strComputer & "\root\cimv2")
Set colProcess = objWMIService.ExecQuery _
("Select * from Win32_Process Where Name = " & strProcessKill )
For Each objProcess in colProcess
objProcess.Terminate()
Next
WshShell.AppActivate "Im abgesicherten Modus starten?"
WS*****.Sleep 200
WshShell.SendKeys ("{TAB}")
WshShell.SendKeys ("{ENTER}")
WS*****.Sleep 3000
WshShell.Run "D:\Program Files\Steam\Steam.exe -applaunch 10190"
Jetzt macht das S***** folgendes:
- Es Beendet die EXE und klickt die Fehlermeldung weg
- wartet 5 Sekunden und startet anschliessend D:\Program Files\Steam\Steam.exe mit dem Parameter -applaunch 10190
Kann es nur nicht testen, da ich selbst kein Steam habe, sollte aber funktionieren.
//Edit:
Das Ganze kann man jetzt in einem S***** laufen lassen, wenn du es auf eine Taste legtst - z.B. von der Logitech G15.