vbs代碼打開指定路徑下的所以文件夾（在不知道文件夾名字的情況下）

根據指定路徑中的文件夾返回相應的

Folder 對象。

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?If

End?Sub

妳可以參考下

上一篇:衡陽九中初中招生情況

下一篇:消防應急廣播分配盤可以外接幾個擴展鍵盤