溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
這篇文章將為大家詳細講解有關VBS如何遍歷文件或文件夾路徑輸入文件的所有絕對路徑，小編覺得挺實用的，因此分享給大家做個參考，希望大家閱讀完這篇文章后可以有所收獲。
示例代碼如下：
Function listFilesPath(filepath)
t1=Timer()
Debug.WriteLine "****現在開始執行計數，用時："+CStr(t1)
Set fso=CreateObject("scripting.filesystemobject")
Set myfolder=fso.GetFolder(filepath)
If fso.FolderExists(filepath) then
Set subcol=myfolder.SubFolders
Set filescol=myfolder.Files
For Each file In filescol
Debug.WriteLine filepath+"\"+file.name
Next
If subcol.count>0 Then
For Each folder In subcol
'Debug.WriteLine filepath+"\"+folder.Name
listFilesPath(filepath+"\"+folder.Name)
next
End if
Else
Debug.WriteLine "沒有該文件系統"
End if
Set filescol=Nothing
Set subcol=nothing
Set fso=Nothing
t2=Timer()
Debug.WriteLine "****現在完成計數，用時："+CStr(t2)
Debug.WriteLine "整個操作過程用時:"&CStr(t2-t1)&" 秒"
End function關于“VBS如何遍歷文件或文件夾路徑輸入文件的所有絕對路徑”這篇文章就分享到這里了，希望以上內容可以對大家有一定的幫助，使各位可以學到更多知識，如果覺得文章不錯，請把它分享出去讓更多的人看到。
免責聲明：本站發布的內容（圖片、視頻和文字）以原創、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
