在Delphi中使用ADO直接訪問Excel數據文件

出處 : http://www.52delphi.com

要用DELPHI中的ADO系列控件訪問Excel數據文件，首先應該建立一些基本概念。你需要將一個Excel數據文件想像為一個關係數據庫，Excel文件中的每個工作表就對應該數據庫中的一個表，而工作表中的每一列當然就是表的列了。然後，按照下列面的秘訣進行就可以。

1. 設置ADOConnection的ConnectionString
   構造ConnectionString時，OLE DB的提供者要選擇Microsoft Jet 4.0 OLE DB Provider作為ADO的驅動程序。這本來是用於連接Access數據庫的驅動程序，但也可打開Excel文件。
   連接的數據庫名稱當然就是你要打開的Excel文件，注意擴展名是*.xls，而不是*.mdb。
   最關鍵的一點是，還要設置擴展屬性Extended Properties為“Excel 8.0”，否則，測試連接時會報告無法識別數據格式的錯誤。 Extended Properties的屬性值在“所有”參數頁中輸入。
   最後，設置完成後的ConnectionString中的各項參數為：
   　　Provider=Microsoft.Jet.OLEDB.4.0
   　　Data Source=MyExcelFile.xls
   　　Extended Properties=Excel 8.0
   　　Persist Security Info=False
   
2. 設置ADODataSet或ADOTable
   將ADODataSet或ADOTable連接到剛才的ADOConnection。如果不用ADOConnection，也可以參照上面的方法直接設置ADODataSet或ADOTable的ConnectionString屬性。
   對於ADODataSet，需要將CommandType屬性設置為cmdTableDirect，而對於ADOTable，則將TableDirect屬性設置為True。因為，訪問Excel文件是直接的數據文件訪問，不是通過SQL語句來操作游標訪問的。如果不設置直接訪問，則係統會報告SQL語句格式錯誤等信息。
   然後，當你下拉ADODataSet中的CommandText屬性或ADOTable的TableName屬性時，就可以選擇到要打開的工作表了。注意，表名後面多了加一個$符號。
   
3. 打開ADODataSet或ADOTable