当前位置: 移动技术网 > IT编程>脚本编程>VBScript > VBS递归创建多级目录文件夹的方法

VBS递归创建多级目录文件夹的方法

2020年03月09日  | 移动技术网IT编程  | 我要评论

金沙学府业主论坛,福建社区,云南国旅

核心代码

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 方法

如对本文有疑问,请在下面进行留言讨论,广大热心网友会与你互动!! 点击进行留言回复

相关文章:

验证码:
移动技术网