#include <Array.au3>
#Include <File.au3>
Local $FileNumber = 0 ;記錄數(shù)組維數(shù),全局變量
Local $FileArray[1] ;返回的文件名主數(shù)組(全路徑),全局變量
Local $result = "result.txt"
FindFiles("G:\photo", "*.jpg") ;這里改為你自己要遍歷的文件夾
;$FileArray[0] = $FileNumber
;_ArrayDisplay($FileArray, "Pictures");調(diào)用“Array.au3”的子函數(shù)函數(shù),顯示整個數(shù)組信息
For $i = 1 To $FileNumber
FileWriteLine($result, $FileArray[$i])
Next
Func FindFiles($path,$filelx)
Local $filelist
Local $folders
Local $i,$j,$newpath
$filelist = _FileListToArray ($path,$filelx,1)
if not @error then
if $filelist[0]>0 Then
for $i=1 to $filelist[0]
$FileNumber = $FileNumber + 1
ReDim $FileArray[UBound($FileArray) + 1]
$FileArray[$FileNumber] = $path & "\" & $filelist[$i]
Next
EndIf
EndIf
$folders = _FileListToArray ($path,"*",2)
if Not @error Then
If $folders[0] > 0 Then
For $j=1 to $folders[0]
$newpath = $path & "\" & $folders[$j]
FindFiles($newpath,$filelx)
Next
EndIf
EndIf
EndFunc
-----------------------------------------------------------------
結(jié)果在腳本程序目錄下的result.txt文件里。
本站僅提供存儲服務,所有內(nèi)容均由用戶發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請
點擊舉報。