网站首页  汉语字词  英语词汇  考试资料  写作素材  旧版资料

请输入您要查询的范文:

 

标题 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
    效果图:
    
1.jpg
随便看

 

在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板,是学习及工作的有利工具。

 

Copyright © 2002-2024 cuapp.net All Rights Reserved
更新时间:2025/5/18 12:12:01