Delphi OLE Automation导入Excel数据到Access表
Delphi 里把 Excel 数据导到 Access 表，其实还挺常见的，尤其是做数据整合或者自动化办公的时候。这种活儿，手动搞太费劲，用 OLE Automation 就省事多了。你可以直接操控 Excel 和 Access，就像在用它们自己的 API 一样，打开文件、拷数据、保存，一条龙下来挺顺的。
核心思路就是搞两个 OLE 对象：一个管 Excel，一个管 Access。先打开 Excel 文件，拿到你想要的那张表，创建 Access 应用，把数据扔进指定的表里。最省事的方式是用DoCmd.TransferSpreadsheet，一行命令就能把 Excel 内容导进去，连字段都能自动匹配。
代码也不复杂，CreateOleObject搞起 Excel 和 Access，按部就班地操作。要注意的点呢，一个是异常，比如路径不对、文件打不开这些坑，另一个是性能，数据多的话别一次全读，可以分批，或者考虑读取数据流。
嗯对了，这种方法用在客户端还挺合适的，但不太适合服务器环境，毕竟 Office 组件不适合在服务器上无头运行。如果你想深入研究 OLE 操作，推荐看看后面的相关文章，有源码有例子，挺全的。
文件大小：376.19KB
评论区