VBS教程:方法-AddFolders 方法(Folders)
AddFolders 方法(Folders)
向 Folders 集合添加新 Folder。
object. Add(folderName)
參數(shù)
object
必選項(xiàng)。應(yīng)為 Folders 集合的名稱。
folderName
必選項(xiàng)。要添加的新 Folder 名稱。
說(shuō)明
下面例子舉例說(shuō)明如何利用 Add 方法添加新文件夾:
Sub AddNewFolder(path, folderName) Dim fso, f, fc, nf Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFolder(path) Set fc = f.SubFolders If folderName <> "" Then Set nf = fc.Add(folderName) Else Set nf = fc.Add("New Folder") End IfEnd Sub
如果 folderName 已經(jīng)存在,則會(huì)出現(xiàn)錯(cuò)誤。
相關(guān)文章
VBS獲取GZIP壓縮的HTTP內(nèi)容的實(shí)現(xiàn)代碼
這篇文章主要介紹了VBS獲取GZIP壓縮的HTTP內(nèi)容的實(shí)現(xiàn)代碼,需要的朋友可以參考下2016-01-01VBS教程:VBScript 基礎(chǔ)-使用循環(huán)語(yǔ)句
VBS教程:VBScript 基礎(chǔ)-使用循環(huán)語(yǔ)句...2006-11-11VBS教程:VBScript 語(yǔ)句-Sub 語(yǔ)句
VBS教程:VBScript 語(yǔ)句-Sub 語(yǔ)句...2006-11-11VBS教程:VBscript語(yǔ)句-ExecuteGlobal 語(yǔ)句
VBS教程:VBscript語(yǔ)句-ExecuteGlobal 語(yǔ)句...2006-11-11