VBS获取当前目录下所有文件夹名字的代码
更新时间：2013年09月03日 16:39:43 作者：
有时候我们需要获取当前目录下所有文件夹的名字，那么就可以参考下面的代码了
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
效果图：
测试的时候要保证当前目录下有文件夹才可以，否则输出为空。
复制代码 代码如下:
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
效果图：
相关文章
一个可以隐藏任务栏图标的脚本，方便需要隐藏任务栏图标的朋友2008-06-06
这个简短的脚本使用wmi显示与工具“tasklist”中相同的信息，但只有在命令行下输出结果。它也可以在另一台计算机上查看远程任务,需要的朋友可以参考下2019-04-04
用vbs读取Excel文件的函数代码，不需要安装execl，需要的朋友可以参考下。2011-12-12
从XML文件中获取信息的vbs代码，这个脚本演示了如何通过MSXML从一个XML文件中的信息。示例XML文件是用于在网站上的相册。此脚本将返回特定图片的标题。2011-12-12
今天有人问我如何向APPlication 发送双引号，分号等，我在这里做一个总结，方便你使用参考2009-07-07
远程开启/关闭目标telnet服务的windows脚本RTCS.vbs
远程开启/关闭目标telnet服务的windows脚本RTCS.vbs...2007-02-02
这个cmdshell需要结合nc进行配合使用，现在肉鸡上执行cmdshell然后在本地上面运行nc，注意看下面的参数2013-07-07
VBScript语言提供了两个语句和一个对象来处理"运行时错误"，如下，1.On Error Resume Next语句,2.On Error Goto 0语句,3.Err对象,下面我们就来详细探讨下。2015-05-05
用vbs实现的定时关机重启的脚本，没想到haiwa2005年就写了这个东西，原理就是调用了shutdown和vbs的延时功能2008-06-06
这篇文章主要介绍了使用VBS获取当前日期的前一天 并修正输出格式,需要的朋友可以参考下2014-05-05
最新评论