Free Republic
Browse · Search
General/Chat
Topics · Post Article

To: Malsua; soccer_maniac; Klutz Dohanger; Drango; texas booster
I got so tired of the abnormal shutdowns and not getting the extra SSE boosts that I found and modified this vbs script to "gracefully" restart the folding service. Later, I want to put some checking in to see if the abnormal shut down error is shown and then have the service auto restarted. Maybe some of you might find it helpful. BTW, it seems the 2106 and 7s are causing a lot more of these. Oh, well, here is the script. Just put it in a text file and call the file whatever.vbs. For dual processors, set up two files. One for each. Then run the restart script off (put on desk top and double click it) whenever you see the abnormal stoppage error. Also, I am not Guy Thomas. I left his name as credit for the original script.

' RestartServices.vbs
' Example VBScript to Restart Services
' Author Guy Thomas http://computerperformance.co.uk/
' Version 1.3 - March 20th 2005
' -----------------------------------------------------------------'
Option Explicit
Dim objShell, intShortSleep, intLongSleep
Dim strService
Set objShell = CreateObject("WScript.Shell")


' Values set
' uncomment and use the first one, if you are using dual
processors. Change the processor name to CPU1 or CPU2. 'strService = "FAH@C:{+}FoldingProject{+}CPU1{+}FAH502-Console.exe"
strService = " FAH@C:{+}folding{+}FAH502-Console.exe"
intShortSleep = 1500
intLongSleep = 5500

' Cmd prompt opened
objShell.Run "cmd"
Wscript.Sleep intShortSleep

'
objShell.SendKeys "cd c:\"
Wscript.Sleep intShortSleep
objShell.SendKeys "{Enter}"


' Service stopped with 'Net' command
objShell.SendKeys "net stop" & strService
Wscript.Sleep intShortSleep
objShell.SendKeys "{Enter}"
Wscript.Sleep intLongSleep

' Service started with 'Net' command
objShell.SendKeys "net start" & strService
Wscript.Sleep intShortSleep
objShell.SendKeys "{Enter}"
Wscript.Sleep intLongSleep

' Cmd prompt exited
objShell.SendKeys "Exit"
Wscript.Sleep intShortSleep
objShell.SendKeys "{Enter}"


WScript.Quit

85 posted on 03/14/2006 7:34:18 PM PST by FreeAtlanta (Join FR Team 36120 at http://folding.stanford.edu {Protein Folding Project})
[ Post Reply | Private Reply | To 84 | View Replies ]


To: FreeAtlanta
I've not had any issues. I can't comment on why you're having those issues. I suppose if you're having issues letting it run for long periods, and this works for you, GREAT!. Sorry to hear you're having issues :(.

Of course, yesterday, I had a banner day.


86 posted on 03/14/2006 7:39:32 PM PST by Malsua
[ Post Reply | Private Reply | To 85 | View Replies ]

To: FreeAtlanta; Malsua; All

I'm running a Pentium III 533MHz working on Tinker p1152 for the umpteenth time. Should I be seeing things about "SSE" in my log file? I read that Tinker cores WUs aren't optimized, so does SSE not apply to Tinkers?
I barely know what I'm asking. Just checking. =)


96 posted on 03/15/2006 5:38:32 AM PST by Clara Lou (A conservative is a liberal who has been mugged by reality. --I. Kristol)
[ Post Reply | Private Reply | To 85 | View Replies ]

Free Republic
Browse · Search
General/Chat
Topics · Post Article


FreeRepublic, LLC, PO BOX 9771, FRESNO, CA 93794
FreeRepublic.com is powered by software copyright 2000-2008 John Robinson