关于 MAXScript 获取全部文件

MAXScript 官方文档里关于获取文件夹下所有文件的方法

fn getFilesRecursive root pattern =

(

dir_array = GetDirectories (root+"/*")

for d in dir_array do

  join dir_array (GetDirectories (d+"/*"))

my_files = #()

for f in dir_array do

  join my_files (getFiles (f + pattern))

my_files

)

--get all .ms files from the folder c:/temp --and all its subfolders:

getFilesRecursive "c:/temp" "*.ms"

测试后发现无法获取单个文件夹内的文件,比如"C:/temp"下只有文件"1.ms","2.ms"就无法获取.

解决办如下

fn getFilesRecursive root pattern =

(

dir_array = GetDirectories (root+"/*")

for d in dir_array do

  join dir_array (GetDirectories (d+"/*"))

my_files = #()

if dir_array.count == 0 do append dir_array (root + "\\")

for f in dir_array do

  join my_files (getFiles (f + pattern))

my_files

)

这样就可以了,如果搜索目录内没有其他文件夹,那么就搜索该目录内的文件.

再或者,收集指定目录及目录内所有子目录的文件.

fn getFilesRecursive root pattern =

(

dir_array = GetDirectories (root+"/*")

for d in dir_array do

  join dir_array (GetDirectories (d+"/*"))

my_files = #()

append dir_array (root + "\\")

for f in dir_array do

  join my_files (getFiles (f + pattern))

my_files

)