脚本之家,脚本语言编程技术及教程分享平台!
分类导航

Python|VBS|Ruby|Lua|perl|VBA|Golang|PowerShell|Erlang|autoit|Dos|bat|

服务器之家 - 脚本之家 - VBS - VBS获取当前目录下所有文件夹名字的代码

VBS获取当前目录下所有文件夹名字的代码

2020-08-12 09:57VBS代码网 VBS

有时候我们需要获取当前目录下所有文件夹的名字,那么就可以参考下面的代码了

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获取当前目录下所有文件夹名字的代码

延伸 · 阅读

精彩推荐