VBS獲取當前目錄下所有文件夾名字的代碼

2019-10-26 18:06:33

字體：大中小

來源：轉載

供稿：網友

VBS獲取當前目錄下所有文件夾名字，不包括子文件夾。我要給每個文件夾進行操作，所以最好用循環輸出。

測試的時候要保證當前目錄下有文件夾才可以，否則輸出為空。
復制代碼代碼如下:

Set ws=WScript.CreateObject("wscript.shell")
w=ws.CurrentDirectory
Set fso=WScript.CreateObject("scripting.filesystemobject")
Set fs=fso.GetFolder(w)
Set f=fs.SubFolders
For Each uu In f
t=t & uu.Path & vbcrlf
Next
MsgBox t

效果圖：

您可能感興趣的文章:

用vbs實現獲取電腦硬件信息的腳本_最新版用VBS控制鼠標的實現代碼（獲取鼠標坐標、鼠標移動、鼠標單擊、鼠標雙擊、鼠標右擊）獲取外網IP并發送到指定郵箱的vbs代碼[已測]vbs 獲取當前目錄的實現代碼vbs獲取當前時間日期的代碼vbscript獲取文件的創建時間、最后修改時間和最后訪問時間的方法vbs中獲取腳本當前路徑的2個方法通過vbs獲取遠程host文件并保存到指定目錄VBScript獲取CPU使用率的方法使用vbs獲取雅虎匯率

上一篇：VBS 正則判別素數(質數)

下一篇：vbs獲取當前路徑的代碼