Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek dla www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

Program do zamykania aplikacji

21 Paź 2007 21:31 2291 2
  • Poziom 19  
    Witam. Poszukuje jakiegoś programiku o ile taki jest do zamykania innych aplikacji działających na win XP. Chodzi mi o to że włączam sobie program działam na nim i odchodzę od kompa nie wyłączając go po przykładowo 2 min. program się wyłącza sam.
  • Poziom 21  
    1. Stwórz plik tekstowy VBSript (rozszerzenie .VBS), wklej do niego to co poniżej.
    2. Uruchom kalkulator (calc.exe)
    3. Uruchom ten skrypt - kalkulator zostanie "ubity"


    W linii:
    strProcessKill = "'calc.exe'"

    możesz wpisać inny programik który chcesz ubijać.

    Dorobienie opóźnienia czasowego zostawiam Ci na deser ;)

    Cytat:

    'Kill process
    Option Explicit
    Dim objWMIService, objProcess, colProcess
    Dim strComputer, strProcessKill
    strComputer = "."
    strProcessKill = "'calc.exe'"

    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
    WSCript.Echo "Zabiłem " & strProcessKill _
    & " na komputerze " & strComputer
    WScript.Quit