Reply to thread

Message

<blockquote data-quote="skoov" data-source="post: 109065" data-attributes="member: 24844">Here's the script thenSave this into a file with '.vbs' extension and then run. You can create a shortcut in your 'start up' folder to run each time windows runs.Enter any commands you want to run when the computer is suspending/hibernating in the 'case 4' section. The command taskkill is available as standard in XP Pro, but not in XP Home. Any commands when resuming go into the 'case 7' and 'case 18' sections. Depending on how the system is 'told to resume' depends which of these two cases occur, see <a href="http://www.microsoft.com/technet/scriptcenter/guide/sas_cpm_ksrm.mspx?mfr=true" target="_blank">http://www.microsoft.com/technet/scriptcenter/guide/sas_cpm_ksrm.mspx?mfr=true</a> for more details.[CODE]Set colMonitoredEvents = GetObject(&quot;winmgmts:&quot;).ExecNotificationQuery(&quot;Select * from Win32_PowerManagementEvent&quot;) Set WshShell = WScript.CreateObject(&quot;WScript.Shell&quot;)Do&nbsp; &nbsp; Set strLatestEvent = colMonitoredEvents.NextEvent&nbsp; &nbsp; Select Case strLatestEvent.EventType&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; case 4&nbsp; &nbsp; &nbsp; &nbsp; ' Entering Suspend. uses the XP command taskkill to end a process.&nbsp; &nbsp; &nbsp; &nbsp; WshShell.Run &quot;d:\tools\taskkill /F /IM imon.exe&quot;, 0&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; case 7&nbsp; &nbsp; &nbsp; &nbsp; ' Resume from Suspend. Indicates that a ResumeSuspend message has been sent, enabling the computer to return to its regular power state.&nbsp; &nbsp; &nbsp; &nbsp; WshShell.Run &quot;C:\Progra~1\SOUNDG~1\iMON\iMON.exe&quot;, 0&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; case 18&nbsp; &nbsp; &nbsp; &nbsp; 'Resume Automatic. Indicates that the computer has awakened in response to an event. &nbsp; &nbsp; &nbsp; &nbsp; WshShell.Run &quot;C:\Progra~1\SOUNDG~1\iMON\iMON.exe&quot;, 0&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; End SelectLoop[/CODE]CheersSkoov</blockquote>

[QUOTE="skoov, post: 109065, member: 24844"] [b]Here's the script then[/b] Save this into a file with '.vbs' extension and then run. You can create a shortcut in your 'start up' folder to run each time windows runs. Enter any commands you want to run when the computer is suspending/hibernating in the 'case 4' section. The command taskkill is available as standard in XP Pro, but not in XP Home. Any commands when resuming go into the 'case 7' and 'case 18' sections. Depending on how the system is 'told to resume' depends which of these two cases occur, see [url]http://www.microsoft.com/technet/scriptcenter/guide/sas_cpm_ksrm.mspx?mfr=true[/url] for more details. [CODE]Set colMonitoredEvents = GetObject("winmgmts:").ExecNotificationQuery("Select * from Win32_PowerManagementEvent") Set WshShell = WScript.CreateObject("WScript.Shell") Do Set strLatestEvent = colMonitoredEvents.NextEvent Select Case strLatestEvent.EventType case 4 ' Entering Suspend. uses the XP command taskkill to end a process. WshShell.Run "d:\tools\taskkill /F /IM imon.exe", 0 case 7 ' Resume from Suspend. Indicates that a ResumeSuspend message has been sent, enabling the computer to return to its regular power state. WshShell.Run "C:\Progra~1\SOUNDG~1\iMON\iMON.exe", 0 case 18 'Resume Automatic. Indicates that the computer has awakened in response to an event. WshShell.Run "C:\Progra~1\SOUNDG~1\iMON\iMON.exe", 0 End Select Loop[/CODE] Cheers Skoov [/QUOTE]

Verification