0

Windows 7 で通常のシャットダウンを防止できるようにしたいのですが、この AutoIt スクリプトを見つけましたが、実際には強制シャットダウン ダイアログの [キャンセル] ボタンをクリックしていません。

誰かがそれをテストして、正確に何が悪いのか教えてくれますか?

$WM_QUERYENDSESSION = 0x11
GUIRegisterMsg($WM_QUERYENDSESSION, "Cancel_Shutdown")
$Hwnd = GUICreate("PreventShutdownGUI")
;~ GUISetSTate(@SW_SHOW)


_ShutdownBlockReasonCreate($hwnd, "Sorry, AutoIt > Windows")
TrayTip("Shutdown Blocker - Started", "Denies shutdowns from now on.", 20)
While Sleep(100)
WEnd
_ShutdownBlockReasonDestroy($hwnd)

Func _ShutdownBlockReasonCreate($Hwnd, $wStr)
    ; http://msdn.microsoft.com/en-us/library/ms...28VS.85%29.aspx
    ; Prog@ndy
    Local $aResult = DllCall("User32.dll", "int", "ShutdownBlockReasonCreate", "hwnd", $Hwnd, "wstr", $wStr)
    If @error Then Return SetError(1,0,0)
    Return $aResult[0]
EndFunc

Func _ShutdownBlockReasonDestroy($Hwnd)
    Local $aResult = DllCall("User32.dll", "int", "ShutdownBlockReasonDestroy", "hwnd", $Hwnd)
    If @error Then Return SetError(1,0,0)
    Return $aResult[0]
EndFunc

Func Cancel_Shutdown($hWndGUI, $MsgID, $WParam, $LParam)
    ; This HAS to be here to capture the endsession...
    AdlibRegister("Cancel_ShutdownResolver",50)
    Return False
EndFunc

Func Cancel_ShutdownResolver()
    Local $iOpt = Opt("WinTitleMatchMode",4),$hwnd = WinGetHandle("[CLASS:BlockedShutdownResolver]")
    Opt("WinTitleMatchMode",$iOpt)
    If $hwnd Then
        If @OSVersion = "WIN_7" Then ControlClick($hwnd,"","[CLASS:Button; INSTANCE:1]")
        If @OSVersion <> "WIN_7" Then ControlClick($hwnd,"","[CLASS:Button; INSTANCE:2]")
        AdlibUnRegister("Cancel_ShutdownResolver")
        TrayTip("Shutdown Blocker - Shutdown denied", "Denied shutdown successfull!", 5)
        _DeineFunktion()  ; <================ Hier musst du deine Funktion einfügen
    EndIf
EndFunc

Func _DeineFunktion()
    MsgBox(0,"","Das hier ist deine Funktion ;) - Danach musst du erneut _ShutdownBlockReasonDestroy($hwnd) aufrufen, und einen neuen Shutdown machen.")
EndFunc
4

1 に答える 1

2

autoitこれは、関数が殺されるのを防ぐ方法のように見えます..

_deineFunction()(関数のドイツ語) は、殺したくない関数です。

于 2012-06-16T22:13:23.787 に答える