最後介紹創建文件選擇列表的代碼,在這裡使用內建的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的一點基本功能,還有更多更強大的方面有待開發。