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

标题	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     效果图：
随便看	山东理工大学2015年硕士研究生招生考试报名注意事项 2014年永州市硕士研究生(双证)永州班招生简章 漯河市2014年成人高考考点安排 2015年辽宁省全国硕士研究生招生考试网报公告 甘肃省高等教育自学考试2015年上半年报考简章 山东政法学院2015年硕士研究生网上报名特别提示 陕西师范大学2015年学术型硕士研究生招生目录 甘肃省高等教育自学考试2015年上半年非学历证书考试表 2015年4月甘肃省高等教育自学考试开考专业及课程考试时间安排表 2015年大连大学推荐免试攻读硕士学位研究生申请表 2014年甘肃省高等教育自学考试各专业实践性环节报名及考核时间表 2015年大连大学硕士研究生同等学力考生加试科目及参考书目 2015年大连大学硕士研究生复试科目及参考书目 平凉市教育局2015年全国硕士研究生招生报名考试工作公告 2014年西安电子科技大学推免生体检安排 2015年沈阳大学硕士研究生招生政策公示 2015年沈阳大学硕士研究生招生计划拟分配方案 2015年沈阳大学招收推荐免试攻读硕士研究生章程 2015年沈阳大学全国招收统一考试硕士研究生招生简章 2015年辽宁大学推荐免试硕士研究生复试录取工作实施细则 2015年辽宁大学推荐免试攻读硕士学位研究生招生简章 2015年辽宁大学接收推荐免试攻读硕士学位研究生招生专业目录 2015年辽宁大学研究生招生问题答疑专栏公告 2015年辽宁大学研究生各接收推免培养单位联系方式公示 2015年辽宁大学单独考试招收攻读硕士学位研究生招生简章 Collocations with sequencing Collocations with sergeant Collocations with series Collocations with seriousness Collocations with servant Collocations with server Collocations with service Collocations with session Collocations with set Collocations with setback 不孝有三，无后为大 不学无术 不宁唯是 不安 灰暗 灰朦朦 灰棚 灰槽子 灰气 灰沉沉 希望为题的初中作文精选五篇 描写人生中需要自信初一作文 文明在心中九年级满分作文 有趣的重阳节九年级话题作文 感动的魅力中学生话题作文 初二作文优秀五篇 阳光很温暖八年级主题作文 初中教师节作文六篇精选 帮助作文初中参考五篇 我读书我快乐初三中考作文为主题

在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。