關於 MAXScript 擷取全部檔案

標籤：style   blog   color   ar   for   檔案   div   sp   log   

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)

這樣就可以了,如果搜尋目錄內沒有其他檔案夾,那麼就搜尋該目錄內的檔案.

關於 MAXScript 擷取全部檔案