******************************
很多時候，我們可能需要某個代碼的一部分，這些代碼將訪問服務器的所有子文件夾以及所有代碼
子文件夾中的文件。
ASP代碼的以下行將映射到指定的文件夾並蒐索所有子文件夾
（不遞歸地，可以將代碼擴展到執行），並逐一讀取所有文件（基本上是文本文件）。
您可以在代碼中給出的備註中指定任何文件夾名稱（內）
'創建文件系統對象
set filesystem = server.createobject（scripting.filesystemobject）
DIM DBCONN
folderPath = server.mappath（主文件夾路徑）
set sfolder = filesystem.getFolder（folderpath）.subfolders
對於sfolder中的每個文件列表
設置文件= folderitem.files
對於文件中的每個fileitem
fname = server.mappath（主文件夾路徑＆folderitem.name＆ /＆fileitem.name
set file = filesystem.opentextfile（fname，1，false）
while file.atendofstream <> true
record = split（file.Readline，〜）
溫德
file.close
filesystem.deletefile（fname）
下一個
下一個
******************************