VBS遞歸創(chuàng)建多級(jí)目錄文件夾的方法
更新時(shí)間：2019年10月20日 21:52:22 作者：piaoyunlive
這篇文章主要介紹了VBS遞歸創(chuàng)建多級(jí)目錄文件夾的方法，主要使用的是vbs fso的GetParentFolderName與CreateFolder函數(shù),需要的朋友可以參考下
核心代碼
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
經(jīng)過測(cè)試運(yùn)行沒問題
文中的兩個(gè)函數(shù)鏈接CreateFolder 方法與GetParentFolderName 方法。
相關(guān)文章
用vbs實(shí)現(xiàn)的確定共享文件夾的本地路徑？
用vbs實(shí)現(xiàn)的確定共享文件夾的本地路徑？...2007-03-03
這篇文章主要介紹了使用 iisext.vbs 啟用應(yīng)用程序的相關(guān)資料,需要的朋友可以參考下2014-07-07
用vbs檢查注冊(cè)表項(xiàng)的訪問權(quán)限的代碼
有時(shí)候我們需要知道我們是否對(duì)注冊(cè)表有訪問權(quán)限，下面的代碼就是解決了這個(gè)問題，檢查下是否能用vbs修改注冊(cè)表項(xiàng)2008-06-06
用VBS控制鼠標(biāo)的實(shí)現(xiàn)代碼（獲取鼠標(biāo)坐標(biāo)、鼠標(biāo)移動(dòng)、鼠標(biāo)單擊、鼠標(biāo)雙擊、鼠標(biāo)右擊）
不止一個(gè)人問過我怎樣用VBS控制鼠標(biāo)操作，比如：怎么用VBS獲取鼠標(biāo)指針的坐標(biāo)位置？怎么用VBS移動(dòng)鼠標(biāo)2011-10-10
自己最近沒事研究注冊(cè)表，下面我想將自己找到的一些實(shí)用的VBS腳本送給大家2008-06-06
用vbscript實(shí)現(xiàn)隱藏任務(wù)欄圖標(biāo)的腳本
一個(gè)可以隱藏任務(wù)欄圖標(biāo)的腳本，方便需要隱藏任務(wù)欄圖標(biāo)的朋友2008-06-06
VBS遍歷文件或文件夾路徑輸入文件的所有絕對(duì)路徑（附源碼）
這篇文章主要介紹了VBS遍歷文件或文件夾路徑輸入文件的所有絕對(duì)路徑的代碼,需要的朋友可以參考下2019-12-12
vbscript 可以按引用傳遞參數(shù)嗎？...2006-10-10
VBS教程：屬性-IsRootFolder 屬性...2006-11-11
VBS中的堆棧需要使用System.Collections.Stack，下面的代碼包含堆棧的添加元素（壓棧）、刪除元素（出棧）、遍歷、統(tǒng)計(jì)元素個(gè)數(shù)、清空,需要的朋友可以參考下2018-05-05