DELPHI中使用ADO直接访问Excel数据文件

======================================================
注：本文源代码点此下载
======================================================

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

======================================================
在最后，我邀请大家参加新浪APP，就是新浪免费送大家的一个空间，支持PHP+MySql，免费二级域名，免费域名绑定 这个是我邀请的地址，您通过这个链接注册即为我的好友，并获赠云豆500个，价值5元哦！短网址是http://t.cn/SXOiLh我创建的小站每天访客已经达到2000+了，每天挂广告赚50+元哦，呵呵，饭钱不愁了，\(^o^)/