<%’创建多级目录，可以创建不存在的根目录’参数：要创建的目录名称，可以是多级’返回逻辑值，True成功，False失败’创建目录的根目录从当前目录开始’---------------------------------------------------Function CreateMultiFolder(ByVal CFolder)    Dim objFSO, PhCreateFolder, CreateFolderArray, CreateFolder  &nb...