批量检测文件目录工具

.计次循环首 (超级列表框1.取表项数 (), 局_索引)
局_打开目录 ＝ 超级列表框1.取标题 (局_索引 － 1, 1)
局_文件句柄 ＝ _打开文件 (局_打开目录, 位或 (-2147483648, 1073741824), 位或 (1, 2, 4), 0, 3, 33554432, 0)
.如果真 (局_文件句柄 ＜ 1)
超级列表框1.置标题 (局_索引 － 1, 2, “打开失败”)
到循环尾 ()
.如果真结束
超级列表框1.置表项数值 (局_索引 － 1, 局_文件句柄)
局_线程句柄 ＝ _创建线程 (0, 0, 到整数 (&监视目录线程函数), 局_索引 － 1, 0, 局_线程ID)
.如果真 (局_线程句柄 ＜ 1)
超级列表框1.置标题 (局_索引 － 1, 2, “创建线程失败”)