Shut Down Certain Programs

[jimraelee]

Hi all, new to the script thing so please bare with me... I needed a script to run in the back ground to shut off certian apps after a certain time of day. a friend helped me, and wrote this script. It worked great to monitor 1 app such as msn messenger.... but when I added a second app such as iexplorier.exe and or msmng.exe ( windos messenger) it seemed to stop shutting down the apps, stopped working. any ideas??? should I set a diff scritp to monitor each app I want shut down at a given time????

; Script Start

;Monday - Friday restricted 18:00-21:00

;Saturday and Sunday unrestricted

#notrayicon

;Name of the process to monitor.

$proc="iexplore.exe"

$proc="msnmsgr.exe"

;$proc="gaim.exe"

;Start Time Restriction

$S=18

;End Time Restriction

$E=21

while 1

if @wday <> 1 or @wday<>7 then

if ProcessExists($proc) and @hour < $S Or @hour >= $E then

processclose($proc)

EndIf

sleep(2000)

wend

[bucky002]

I think this might work.

expandcollapse popup

; Script Start

;Monday - Friday restricted 18:00-21:00
;Saturday and Sunday unrestricted

#notrayicon

;Name of the process to monitor.
$proc="iexplore.exe"
$proc1="msnmsgr.exe"
$proc2="gaim.exe"

;Start Time Restriction
$S=18

;End Time Restriction
$E=21


while 1
if @wday <> 1 or @wday<>7 then
if ProcessExists($proc) and @hour < $S Or @hour >= $E then
processclose($proc)
EndIf
sleep(2000)

if @wday <> 1 or @wday<>7 then
if ProcessExists($proc1) and @hour < $S Or @hour >= $E then
processclose($proc1)
EndIf
sleep(2000)

if @wday <> 1 or @wday<>7 then
if ProcessExists($proc2) and @hour < $S Or @hour >= $E then
processclose($proc)
EndIf
sleep(2000)
wend

Let me know if it doesn't

[Xenobiologist]

Hi,

try soemthing like this:

; Script Start

;Monday - Friday restricted 18:00-21:00
;Saturday and Sunday unrestricted

#notrayicon

;Name of the process to monitor.

Dim $procArray = StringSplit('iexplore.exe,msnmsgr.exe,gaim.exe', ',')

;Start Time Restriction
$S = 18

;End Time Restriction
$E = 21


While 1
    If @WDAY <> 1 Or @WDAY <> 7 Then
        For $i = 1 To UBound($procArray) -1
            If ProcessExists($procArray[$i]) And @HOUR < $S Or @HOUR >= $E Then
                ProcessClose($procArray[$i])
            EndIf
        Next
    EndIf
    Sleep(5000)
WEnd

So long,

Mega

Edited April 17, 2006 by th.meger

[jimraelee]

Bucky and meger, thanks for the scripts.... I will test this tonight and let you know later