最后介紹創(chuàng)建文件選擇列表的代碼，在這里使用內(nèi)建的FileSystem對(duì)象獲得文件和文件夾的信息。

　　 為簡(jiǎn)單起見(jiàn)，例程假設(shè)電子數(shù)據(jù)表文件和ASP文件位于同一個(gè)目錄下。通過(guò)vServerFolder= Server.MapPath(".") 獲取當(dāng)前目錄名稱，并將之轉(zhuǎn)換到folder對(duì)象，從而找出目錄中的文件。 FileSystem對(duì)象的.GetFolder方法使用如下：

Set oFs = Server.CreateObject("Scripting.FileSystemObject")
Set oFolder = oFs.GetFolder(vServerFolder)
　　 通過(guò)Folder對(duì)象的.Files集合的列舉，可以獲取文件夾下的文件，并且限制顯示的文件類型為Excel。執(zhí)行下面的HTML/ASP代碼創(chuàng)建文件選擇列表：

< 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 >

　　 同樣的，實(shí)際的ReadX1.asp代碼要復(fù)雜些，因?yàn)橛幸恍㎎avaScript腳本要取回上一次的選擇。

　　 總結(jié)

　　 上面介紹了如何通過(guò)ADO讀取Excel工作簿的方法，以及內(nèi)建對(duì)象FileSystem的使用技巧。除了廣泛地應(yīng)用于數(shù)據(jù)庫(kù)領(lǐng)域，ADO能處理許多不同格式的數(shù)據(jù)，其方式就象處理數(shù)據(jù)庫(kù)一樣。這里只是接觸到ADO的一點(diǎn)基本功能，還有更多更強(qiáng)大的方面有待開(kāi)發(fā)。