源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

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

  • 时间:2022-06-28 18:36 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:VBS获取当前目录下所有文件夹名字的代码
VBS获取当前目录下所有文件夹名字,不包括子文件夹。我要给每个文件夹进行操作,所以最好用循环输出。 测试的时候要保证当前目录下有文件夹才可以,否则输出为空。
[u]复制代码[/u] 代码如下:
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
效果图: [img]http://files.jb51.net/file_images/article/201309/20130903163727.jpg[/img]
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部