找回密码
 加入
搜索
查看: 1989|回复: 7

请问这个程序怎么写,不是很复杂!

[复制链接]
发表于 2009-2-6 19:47:47 | 显示全部楼层 |阅读模式
运行之后弹出一个密码验证窗口不用太大10X30就够了,
当密码是123时验证通过,并运行a.exe
然后等到a.exe不在进程时弹出窗口
询问是否要重启,是就重启,否即退出
如果10秒不操作当做默认重启机子
当密码不是123时跳到另一个标题为"密码错误请重新输入"
三次错误就退出



在这里先谢谢了
发表于 2009-2-6 22:04:23 | 显示全部楼层
#include <GUIConstants.au3>
#include <string.au3>
$a = InputBox("提示","请输入密码","","*",10,10)
if $a = "123" Then
        run("a.exe")
        ProcessWaitClose("a.exe")
        GUICreate("提示",250,50)
        $B = GUICtrlCreateButton ("重启",  15, 10,100,35)
        $C = GUICtrlCreateButton ("取消",  130, 10,100,35)
        GUISetState ()
        While 1
    $msg = GUIGetMsg()
    select
    case $msg = $GUI_EVENT_CLOSE
         ExitLoop
    case $msg = $B
         Shutdown(6)
    case $msg = $C
         exit
EndSelect
Wend
Else
        MsgBox(0,"提示","密码输入错误")
EndIf
我学到的只能帮你这么多,你说的要输入3次错误就退出时间问题帮不到你了.
发表于 2009-2-6 22:58:41 | 显示全部楼层
For $n = 1 To 4
        Select
                Case $n = 1
                        $passwd = InputBox("提示", "请输入密码:", "", "*", 20, 130)
                        If $passwd = 123 Then RunUDF()
                        If @Error = 1 Then Exit
                Case $n = 2 Or $n = 3
                        $passwd = InputBox("提示", $n & "密码错误请重新输入:", "", "*", 20, 130)
                        If $passwd = 123 Then RunUDF()
                        If @Error = 1 Then Exit
                Case Else
                        Exit
        EndSelect
Next

Func RunUDF()
        RunWait("a.exe")
        $Box = MsgBox(1 + 32, "提示", "你是否马上重新启动计算机? ")
        If $Box = 1 Then Shutdown(6)
        Exit
EndFunc   ;==>RunUDF


[ 本帖最后由 即即 于 2009-2-6 23:14 编辑 ]
 楼主| 发表于 2009-2-7 20:39:44 | 显示全部楼层
这个到最后那段 提示  你是否马上重新启动计算机?
这里没有倒计时10秒
如果10秒不操作当做默认重启机子
还有再问一下 RunUDF()
这是跳转命令吗?
怎么定义的
发表于 2009-2-7 21:29:41 | 显示全部楼层
RunUDF()是一个用户自定义函数
发表于 2009-2-7 22:18:12 | 显示全部楼层
扣分猫 重出江湖?
 楼主| 发表于 2009-2-8 20:09:57 | 显示全部楼层
最后那个如果10秒不操作当做默认重启机子

谁能帮我加上去
发表于 2009-2-9 09:28:29 | 显示全部楼层
如果10秒不操作当做默认重启的设置请参考MsgBox的帮助说明。
帮助一定要看。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-15 13:31 , Processed in 0.075849 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表