创建|函数 <%'创建多级目录,可以创建不存在的根目录'参数:要创建的目录名称,可以是多级'返回逻辑值,True成功,False失败'创建目录的根目录从当前目录开始'---------------------------------------------------FunctionCreateMultiFolder(ByValCFolder)DimobjFSO,PhCreateFolder,CreateFolderArray,CreateFolderDimi,ii,CreateFolderSu