最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

VBS遞歸創(chuàng)建多級目錄文件夾的方法

 更新時間:2019年10月20日 21:52:22   作者:piaoyunlive  
這篇文章主要介紹了VBS遞歸創(chuàng)建多級目錄文件夾的方法,主要使用的是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

經過測試運行沒問題

文中的兩個函數(shù)鏈接CreateFolder 方法GetParentFolderName 方法。

相關文章

最新評論

徐州市| 连州市| 长汀县| 内丘县| 乌鲁木齐市| 太保市| 额敏县| 佛坪县| 平遥县| 丹凤县| 东光县| 建平县| 开封县| 新竹市| 恩施市| 大洼县| 洪洞县| 兖州市| 贺州市| 泊头市| 元氏县| 望江县| 乐安县| 珲春市| 陈巴尔虎旗| 南和县| 澄江县| 商水县| 河东区| 丰原市| 梧州市| 石家庄市| 广西| 崇明县| 申扎县| 贡觉县| 杭州市| 中江县| 汉沽区| 桐庐县| 诸城市|