欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

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

程序员文章站 2022-06-25 08:58:44
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获取当前目录下所有文件夹名字的代码