论坛 › 『 提问交流 』 › AU3如何编写20秒加载文件。

tzz365 发表于 2009-3-6 23:08:17

AU3如何编写20秒加载文件。

Opt("GUICloseOnESC", 0)

$msg = MsgBox(1, "天择网络自动系统恢复", "是否进行GHOST快速恢复系统？" & @CRLF & @CRLF & "说明：请确定景象位置e:\MaxBAK\Tz.gho，" & @CRLF & "再把本程序和gho文件放在同一分区根目录下即可按确定。")

如何在20秒后不需要点确定自动运行下面代码。 然后重启。

需要高手改进。在线等/。

（If $msg = 1 Then
        DirCreate("c:\ghos\")
        FileSetAttrib("c:\ntldr", "-SHR")
        FileSetAttrib("c:\grldr", "-SHR")
        FileDelete("c:\ntldr")
        FileDelete("c:\grldr")
        FileInstall("menu.lst", "c:\ghos\", 1)
        FileInstall("GHOSt.IMG", "c:\ghos\", 1)
        FileInstall("memdisk.gz", "c:\ghos\", 1)
        FileInstall("Ghost.exe", "c:\ghos\", 1)
        FileInstall("GRLDR", "c:\", 1)
        FileInstall("ntldr", "c:\", 1)
        FileInstall("Ghost.exe", "e:\MaxBAK\", 1)

        FileSetAttrib("c:\boot.ini", "-SHR")
        IniWrite("c:\boot.ini", "boot loader", "timeout", "5")
        IniWrite("c:\boot.ini", "boot loader", "default", "C:\grldr")
        IniWrite("c:\boot.ini", "operating systems", "C:\grldr", Chr(34) & "系统恢复" & Chr(34))
        $sure = MsgBox(1, "消息", "准备工作完毕，是否重新启动电脑？取消则稍候手动重启。")
        If $sure = 1 Then
                Shutdown(2)
        EndIf

EndIf）

sxd 发表于 2009-3-7 02:02:32

msgbox的第四个参数就是超时啊

查看完整版本: AU3如何编写20秒加载文件。