;后面加入了自毁,不过ahk的名字必须是【0目录生成doc (放于文件夹下).ahk】
;原理是调用cmd,在文件夹目录下面生成列表,直接用tree /f>0list.doc写到bat也是一样的
;双击直接运行
RunWaitMany(”
(
tree /f>0list.doc
)”)
;建立目录
RunWaitMany(commands) {
shell := ComObjCreate(“WScript.Shell”)
; 打开 cmd.exe 禁用命令显示
exec := shell.Exec(ComSpec ” /Q /K echo off”)
; 发送并执行命令, 使用新行分隔
exec.StdIn.WriteLine(commands “`nexit”)
; 保证执行完毕后退出!
; 读取并返回所有命令的输出
return exec.StdOut.ReadAll()
}
SetWorkingDir ,%A_ScriptDir%
;使用ahk文件的当前目录
Run ,0list.doc
;生成后打开文件
Sleep 300
FileDelete ,0目录生成doc (放于文件夹下).ahk
;自毁,不需要的可以省略
return