利用fso顯示某一文件夾中的所有內容
<%
'創建一個FileSystemObject對象的事例
SetMyFileObject=Server.CreateObject("Scripting.FileSystemObject")
path=server.mappath("./folder")'當前目錄下folder文件夾目錄
'創建一個Folder對象
SetMyFolder=MyFileObject.GetFolder(path)
ForEachthinginMyFolder.SubFolders'獲取子文件夾
response.write"<p>目錄："&thing
'MyFileObject.DeleteFolderthing刪除文件夾，注意使用
next
'循環顯示其中文件
ForEachthinginMyFolder.Files
Response.Write("<p>文件："&thing)'輸出文件路徑
'MyFileObject.DeleteFilething'刪除這些文件,此刪除不可以恢復，需要小心使用
Next
%>