Dear 各位大大：
小得最近因為工作需求需要使用VBS 去記錄某個目標資料夾內所有的檔案資訊，
有參考了許多網路範例，最後拼湊出來的結果如下：
在For 迴圈的時候總是顯示不支援物件，但我卻不太清楚是發生了什麼問題???
麻煩各位大大幫忙解惑，感激不盡
Sub testA()
my讀取目錄下所有檔案的路徑及檔名 "C:\Users\wei\Desktop\test\"
End Sub
Sub my讀取目錄下所有檔案的路徑及檔名(ByVal my路徑 As String)
Dim myfso As Object
Dim fsoFile As Object
Dim fsoFolder As Object
Set myfso = CreateObject("Scripting.FileSystemObject")
Set fsoFolder = myfso.getFolder(my路徑)
Set objFSO = CreateObject("Scripting.FileSystemObject") ' new
Set objTXT = objFSO.CreateTextFile(my路徑 & "\FileList.csv") ' new
objTXT.WriteLine ("檔名,路徑,修改時間") ' new
For Each fsoFile In fsoFolder.Files
objTXT.WriteLine (fsoFile.Name & "," & fsoFile.Path & "," &
fsoFile.ModifyDate)
Next
Set myfso = Nothing
Set fsoFolder = Nothing
End Sub