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