#Persistent
#NoTrayIcon
password := "123456" ;设置密码
SetTimer, BlockWindow, 800
Return
BlockWindow:
if WinExist("ahk_class CabinetWClass"){
    WinClose
    WinClose
    InputBox, input_password, 文件资源管理器, 请输入密码 只验证一次
    if (input_password = password) {
        Run, explorer.exe
        ExitApp
    } else {
        MsgBox,, 密码错误
    }
}
复制代码

Run, explorer.exe ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}
复制代码

#NoTrayIcon
#Persistent
SendMode Input
SetWorkingDir, C:\Users\Public\Documents ;密码文件目录
If !FileExist(".password") {
        SetPassword()
    }
SetTimer, BlockWindow, 500
Return

BlockWindow:
if WinExist("ahk_class CabinetWClass"){
    WinClose
    Gui, Destroy
    WinClose
    If !FileExist(".password") {
        SetPassword()
    }
    Gui, Add, Text, w250 h30, 请输入密码 只验证一次:
    Gui, Add, Edit, Password w230 vPassword
    Gui, Add, Button, Default w100 h50 gCheckPassword, 确定
    Gui, Add, Button, w100 h50 gButtonChangePassword, 修改密码
    Gui, Show, w250 h200
    Return
}

SetPassword()
{
    InputBox, input_password, 设置密码, 请设置密码
    FileDelete, .password
    FileAppend, %input_password%, .password
    FileSetAttrib, +H, .password
}
Return

ChangePassword()
{
    FileReadLine, stored_password, .password, 1
    InputBox, current_password, 修改密码, 请输入当前密码
    if (current_password = stored_password) {
        InputBox, new_password, 修改密码, 请输入新密码
        FileDelete, .password
        FileAppend, %new_password%, .password
        FileSetAttrib, +H, .password
        MsgBox,, 密码修改成功
    } else {
        MsgBox,, 当前密码错误
    }
}
Return

CheckPassword:
Gui, Submit
FileReadLine, stored_password, .password, 1
if (password = stored_password) {
    Run, explorer.exe ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}
    ExitApp
} else {
    MsgBox,, 密码错误
}
Return

ButtonChangePassword:
ChangePassword()
Return
复制代码

if WinExist("ahk_class CabinetWClass",,, "地址: H:"){
复制代码