logo elektroda
logo elektroda
X
logo elektroda
REKLAMA
REKLAMA
Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

Automatyczne zamykanie aplikacji po bezczynności na Windows XP

mcciuciek 21 Paź 2007 21:31 2498 2
REKLAMA
  • #1 4401238
    mcciuciek
    Poziom 19  
    Posty: 444
    Pomógł: 3
    Ocena: 9
    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.
  • REKLAMA
  • #3 4402206
    kordirko
    Poziom 22  
    Posty: 307
    Pomógł: 53
    Ocena: 17
    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
REKLAMA