核心代码
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 方法。
发表评论