跳到主要内容

zm.DirScan 遍历文件或目录

🎯功能

在指定目录路径及子目录中遍历文件或目录, 支持通配符*?, 支持安卓7.1版

📜语法

结果 = zm.DirScan(目录路径[, 文件名或目录名[, 遍历类型[, 遍历深度[, 是否区分大小写]]]])

📥参数

参数数据类型解释
目录路径字符串在该目录下遍历文件或目录
文件名或目录名字符串可选, 要找的文件名或目录名, 支持通配符?*, 省略默认为"*"
遍历类型整数型可选, 1代表只遍历文件, 2代表只遍历目录, 3代表文件与目录都要遍历, 省略默认为3
遍历深度整数型可选, 遍历目录深度, -1表示无限制, 省略默认为-1
是否区分大小写布尔型可选, 省略默认为false, 表示不区分大小写

📤返回

, 成功返回文件目录列表数组, 未找到或失败返回null

💡示例

Import "zm.luae" //导入插件,只需执行一次
zm.Init //初始化插件,只需执行一次

Dim t
//获取/sdcard/目录下所有文件与目录, 包括子目录
t = zm.DirScan("/sdcard/", "*")
If t Then
For Each v In t
TracePrint v
Next
End If

//获取/sdcard/目录下所有文件, 包括子目录
t = zm.DirScan("/sdcard/", "*", 1)
If t Then
For Each v In t
TracePrint v
Next
End If

//获取/sdcard/目录下所有目录, 包括子目录
t = zm.DirScan("/sdcard/", "*", 2)
If t Then
For Each v In t
TracePrint v
Next
End If

//获取/sdcard/目录下所有文件和目录, 仅遍历1层
t = zm.DirScan("/sdcard/", "*", 3, 1)
If t Then
For Each v In t
TracePrint v
Next
End If

//遍历/sdcard/目录下以.txt结尾的文件, 仅遍历2层
t = zm.DirScan("/sdcard/", "*.txt", 1, 2)
If t Then
For Each v In t
TracePrint v
Next
End If

📘备注

  • V4.2015
  • 初次加入命令