這篇文章主要講解了“VBS如何獲得Folders集合”,文中的講解內(nèi)容簡(jiǎn)單清晰,易于學(xué)習(xí)與理解,下面請(qǐng)大家跟著小編的思路慢慢深入,一起來研究和學(xué)習(xí)“VBS如何獲得Folders集合”吧!
創(chuàng)新互聯(lián)公司自2013年創(chuàng)立以來,公司以網(wǎng)站設(shè)計(jì)制作、網(wǎng)站設(shè)計(jì)、系統(tǒng)開發(fā)、網(wǎng)絡(luò)推廣、文化傳媒、企業(yè)宣傳、平面廣告設(shè)計(jì)等為主要業(yè)務(wù),適用行業(yè)近百種。服務(wù)企業(yè)客戶成百上千,涉及國內(nèi)多個(gè)省份客戶。擁有多年網(wǎng)站建設(shè)開發(fā)經(jīng)驗(yàn)。為企業(yè)提供專業(yè)的網(wǎng)站建設(shè)、創(chuàng)意設(shè)計(jì)、宣傳推廣等服務(wù)。 通過專業(yè)的設(shè)計(jì)、獨(dú)特的風(fēng)格,為不同客戶提供各種風(fēng)格的特色服務(wù)。包含在一個(gè)Folder 對(duì)象中的所有Folder 對(duì)象的集合。
以下代碼舉例說明如何獲得Folders 集合并使用For Each...Next 語句枚舉集合成員:
Function ShowFolderList(folderspec) Dim fso, f, f1, fc, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFolder(folderspec) Set fc = f.SubFolders For Each f1 in fc s = s & f1.name s = s & "
" Next ShowFolderList = sEnd Function
感謝各位的閱讀,以上就是“VBS如何獲得Folders集合”的內(nèi)容了,經(jīng)過本文的學(xué)習(xí)后,相信大家對(duì)VBS如何獲得Folders集合這一問題有了更深刻的體會(huì),具體使用情況還需要大家實(shí)踐驗(yàn)證。這里是創(chuàng)新互聯(lián)網(wǎng)站建設(shè)公司,,小編將為大家推送更多相關(guān)知識(shí)點(diǎn)的文章,歡迎關(guān)注!