通过ADO实现VB与EXCEL的无缝连接.pdf

维普资讯 60 内蒙古石油4~_r- 2007年第1O期 通过ADO实现VB与EXCEL的无缝连接 倾 明 (兰州石化职业技术学院 ，兰州 730060) 摘 要 ：本文通过使用ADO数据库访问对象模式建立VB与数据库的连接 ，同时用VB控制Excel， 把应用软件 中需要打印输 出的数据导入Excel应用程序中，很方便快捷的完成打印功能，从而避免了使 用报表输 出数据的死板和难度 ，解决了应用软件 中打印难的问题，具有很好的实用性 。 关键词：ADO对象模式；SQL；打印 VB是常用的应用软件开发工具之一，由于VB 的报表功能有限，而且一旦报表格式发生变化，就得 修改相应的程序，给应用软件的维护工作带来极大 的不便。因此有很多程序现在已经充分利用Excel 的强大报表功来实现报表功能。但由于VB与Exce1 分别属于不同的应用系统，如何把它们有机地结合 在一起 ，是一个值得我们研究的课题 。 1 ADO及相关数据访问 微软曾于 1996年提出新的解决通用数据访 问 策略UDA(UniversalDataAccess)。其 目的是想表 达一个开发人员应该能够用一种数据访问方法访 问 他正在查询的任何数据源。ODBC是向这个 目标迈 出了一大步。在ODBC中，应用程序只需用API函数 就能访 问任何形式的数据库，但ODBC的问题是它 图 1 ADO对象数据访 问结构 直接针对关系数据库，其它数据源并不是十分适合 ADo对象模型是平面性质的，利用 ADO的 它的模型。为了解决这个问题，微软在没有对现有结 Connection和Recordset对象可以直接访问数据。也 构妥协的同时，又创建了OLEDB。这样就不用去试 就是ADO从一个数据源中获得记录只需一个连接 图向ODBC中添加功能以便它能象处理关系数据库 和一个记录集。从sQLSERVER中获取数据的步 一 样处理其它数据源了。 骤是：创建并打开一个连接；把打开的这个连接作为 OLEDB是数据提供者和客户应用程序之间的 参数，创建并打开一个记录集 ；关闭记录集 ；关闭连 一 种基于COM 的接 口。数据提供者可以是关系数 接 。 据库、电子表格、文件系统或其它任何形式的数据 一 个典型的ADO数据检索操作如下：①创建 源 ，如RDO(RemoteDataObject，远程数据对象)是 Connection对象的实例 ；②调用Connection对象的 在ODBCAPI基础上产生的。微软在OLEDB上创 Open方法；③创建Recordset对象的实例；④把Con— 建了易于使用的ActiveXData0biects(ActiveX数 nection对象作为一个参数调用 Recordset对象的 据对象，AD0)。 Open方法；⑤在Recordset间移动直到EOF方法返 ADO是进入OLEDB的接 口，它把OLEDB的 回一个TRUE值；⑥调用Recordset对象的Close方 访问封装在一个数据对象中。借助ADO，VB就能利 法；⑦ 调用 Connection对象 的Close方法；⑧把 用UDA的优点了。图1给出了ADO对象数据访 问 Recordset和Connection对象的值设置为Nothing。 的结构。 每一个数据库程序要完成的第一项任务就是建 立数据库的连接，ADO用Connection代替了数据 收稿 日期：2007