Ich weiß nicht, ob Sie noch nach einer Lösung suchen. Ich brauchte etwas, um die Power Button-Einstellung von der Standardeinstellung "Shutdown" in "Do nothing" zu ändern, also habe ich dieses Vbscript geschrieben.
'*************************************************************************************** ' File: pwrDoNothing.vbs ' Author: Joe Rawlins ' Purpose: Set system Power Button to 'Do nothing' ' ' ' Notes: Requires button to be held for 5 seconds to initiate shutdown ' ' ' ' ' Last Modified: 06/25/2010 jtr Initial creation ' '*************************************************************************************** Option Explicit Dim objShell, WshShell Set objShell = CreateObject("Shell.Application") Set WshShell = CreateObject("WScript.Shell") objShell.ControlPanelItem("powercfg.cpl") WScript.Sleep 500 WshShell.SendKeys "+" WScript.Sleep 500 WshShell.SendKeys "" WScript.Sleep 500 WshShell.SendKeys "" WScript.Sleep 500 WshShell.SendKeys "" WScript.Sleep 500 WshShell.SendKeys ""