VBS递归创建多级目录文件夹的方法
更新时间：2019年10月20日 21:52:22 作者：piaoyunlive
这篇文章主要介绍了VBS递归创建多级目录文件夹的方法，主要使用的是vbs fso的GetParentFolderName与CreateFolder函数,需要的朋友可以参考下
核心代码
CreateFolders "d:\jb51test\1\2\3\4\5"
Function CreateFolders(path)
Set fso = CreateObject("scripting.filesystemobject")
CreateFolderEx fso,path
set fso = Nothing
End Function
Function CreateFolderEx(fso,path)
If fso.FolderExists(path) Then
Exit Function
End If
If Not fso.FolderExists(fso.GetParentFolderName(path)) Then
CreateFolderEx fso,fso.GetParentFolderName(path)
End If
fso.CreateFolder(path)
End Function
经过测试运行没问题
文中的两个函数链接CreateFolder 方法与GetParentFolderName 方法。
相关文章
为什么不是停止网站而是暂停网站呢，暂停网站会禁止 Internet 服务接受新连接，但是不影响已经在处理的请求2014-07-07
Msxml2.XMLHTTP Msxml2.ServerXMLHTTP与缓存
用 VBS 发送 HTTP 请求时，首先想到的一般是 Msxml2.XMLHTTP（Microsoft.XMLHTTP 已经不提倡使用了）。2011-10-10
ie7 0day当中的shellcode的escape+xor21加密
shellcode的escape+xor21加密2008-12-12
mdir.vbs 建立隐藏虚拟目录的vbs...2007-03-03
VBS教程：正则表达式简介 -正则表达式...2006-11-11
VBS基础篇 vbscript Sendkeys模拟键盘操作
在vbscript中我们可以object.SendKeys模拟键盘操作，将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行，,需要的朋友可以参考下2018-06-06
这篇文章主要介绍了Vbscript生成Excel报表的常用操作总结,涵盖方方面面的Excel操作命令,不容错过,需要的朋友可以参考下2014-08-08
VBS教程：属性-Type 属性...2006-11-11
有时候服务器为了安全只允许访问的端口加到TCP/IP筛选里面，其它的端口将无法访问。这里的代码就是为了这样的功能实现。2010-04-04
在这里我们仅就访问注册表所涉及的有关对象的方法和属性略做介绍，需要的朋友可以参考一下2006-12-12
最新评论