[已解决]BlockInput(1)测试时好用,编译后到别的机器不起作用,哪位大侠给解答下?

zwanlei

BlockInput(1)测试时好用,编译后到别的机器不起作用,哪位大侠给解答下?

yhxhappy

BlockInput
成功: 返回 1.
失败: 返回 0. 已启用或者未使用 #requireAdmin(需求管理员权限).

是不是上面提到的原因呢，可以在脚本前面加上 #requireAdmin 试试

zwanlei

这是源码

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=D:\tools\ICO\The Icons\Burn.ico
#AutoIt3Wrapper_outfile=BlockInput.exe
#AutoIt3Wrapper_Change2CUI=y
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
If $Cmdline[0] >0 Then
        ;MsgBox(0,"","共传入了" & $Cmdline[0] & "个参数")
        ;For $i = 1 To $Cmdline[0]
        ;        MsgBox(0,$i,$Cmdline[$i])
        ;Next
        ;MsgBox(0,"",$CmdlineRaw)
        If $Cmdline[1] = "1" Then ;如果参数为1，则执行锁定操作
                BlockInput (1)
                ConsoleWrite("键盘鼠标已锁定！")
                Sleep(5000)
                BlockInput(0)
       ElseIf $Cmdline[1] = "0" Then ;如果参数为0，则执行取消锁定操作
                BlockInput (0)
                ConsoleWrite("键盘鼠标已取消锁定！")
        ElseIf $Cmdline[1] = "/?" Then ;如果参数为"/?"，则显示帮助文本
                ConsoleWrite("程序功能：锁定键盘鼠标（或取消锁定）" & @CRLF & "输入" & @ScriptName & " 1执行锁定操作" & @CRLF & "输入" & @ScriptName & " 0执行取消锁定")
        Else
                ConsoleWrite($Cmdline[1] & "不能识别的参数，没有进行任何操作！")
        EndIf
        
Else
        ;MsgBox(0,@ScriptName,"没有传入任何参数")
        ;如果没有传入参数，则执行默认操作（显示帮助文本）
        ConsoleWrite("程序功能：锁定键盘鼠标（或取消锁定）" & @CRLF & "输入" & @ScriptName & " 1执行锁定操作" & @CRLF & "输入" & @ScriptName & " 0执行取消锁定")
EndIf        
Exit

这样测试时可以,但是将

           Sleep(5000)
                BlockInput(0)

去掉,BlockInput就不起作用了,不知道为什么?  前面加不加#requireAdmin   都是这样

kn007

没有循环，程序退出了，就算有

           Sleep(5000)
                BlockInput(0)
在5秒后也失效

masterpcc

学习了！！谢谢！

zwanlei

难道是要让程序一直运行着才有用吗,我试试

zwanlei

回复 4# kn007

谢谢Kn007，确实加个while循环保持程序运行就OK了。问题解决！

kn007

回复  kn007

谢谢Kn007，确实加个while循环保持程序运行就OK了。问题解决！
zwanlei 发表于 2010-11-2 07:23

    那就请在标题上加   已解决   字样