|
最后介紹創建文件選擇列表的代碼，在這里使用內建的FileSystem對象獲得文件和文件夾的信息。
為簡單起見，例程假設電子數據表文件和ASP文件位于同一個目錄下。通過vServerFolder= Server.MapPath(".") 獲取當前目錄名稱，并將之轉換到folder對象，從而找出目錄中的文件。 FileSystem對象的.GetFolder方法使用如下：
Set oFs = Server.CreateObject("Scripting.FileSystemObject")
Set oFolder = oFs.GetFolder(vServerFolder)
通過Folder對象的.Files集合的列舉，可以獲取文件夾下的文件，并且限制顯示的文件類型為Excel。執行下面的HTML/ASP代碼創建文件選擇列表：
< select name="XlBook" >
< %
vOptions = ""
For Each oFile In oFolder.Files
If oFile.Type = "Microsoft Excel Worksheet" Then
vOptions = vOptions & "< option >" & _
Server.HtmlEncode(oFile.Name) & "< /option >
End If
Next
Response.Write vOptions
% >
< /select >
同樣的，實際的ReadX1.asp代碼要復雜些，因為有一些JavaScript腳本要取回上一次的選擇。
總結
上面介紹了如何通過ADO讀取Excel工作簿的方法，以及內建對象FileSystem的使用技巧。除了廣泛地應用于數據庫領域，ADO能處理許多不同格式的數據，其方式就象處理數據庫一樣。這里只是接觸到ADO的一點基本功能，還有更多更強大的方面有待開發。
| 
