基于OLE技术煤矿地质测量网络报表系统研发.pdfVIP

基于OLE技术的煤矿地质测量 网络报表系统的研发 杜新锋，姜在炳 (煤炭科学研究总院西安分院，陕西西安710054) 摘要：通过OLE自动化技术，将VC强大的数据处理能力与EXCEL的电子表格制作功能相结合， 设计开发了煤矿地质测量网络报表系统。系统的程序与报表格式在一定程度上相互独立，简化了 煤矿地质测量报表的设计制作过程，增强了报表系统的适用性及广泛性。 关键词：MSGIS；OLE；ODBC；煤矿；地质测量；报表 0引言 煤矿地质测量报表内容繁多，在格式上又因地域的差异变化较大，对煤矿地质测量信息管理系统的开发 造成了很大的困难。基于0LE技术的煤矿地质测量网络报表系统，作为煤矿地质测量信息管理系统(简称 理能力与EXCEL的电子表格制作功能相结合，大大简化了煤矿地质测量报表的设计制作过程，增强了报表 系统的适用性及广泛性。 1 OLE技术与EXCEL接口对象 and 0LE(objectlinking 自动化(OLE 当了自动化服务器的角色。 Range．Gethem(1)可以返回Cell或Column或Row对象。 2煤矿地质测量网络报表系统的关键技术 煤矿地质测量网络报表系统选择以VisualC为开发工具，首先从煤矿地质测量基础数据库中通过OD— BC的方式读取数据，然后通过OLE连接EXCEL，将数据写入提前定义的EXCEL模板中，生成报表。 2．1数据的读入 在MSGIS中，煤矿地质测量基础数据是存储在MICROSOFTSERVER中的，因此需要选择一定的方 SQL 15 Database 法将数据读进来。ODBC(Open 分，它提供了一组对数据库访问的标准应用程序编程接13，建立一组高层应用程序调用接13和一套基于动态 链接库的运行环境。Vc通过ODBC访问数据库的方式，具有良好的可移植性和数据独立性，有利于应用程 序功能的扩充，尤其是同网络数据库联合应用，具有高效连接和访问的特性，同时还支持事务处理(Transac— tion)。综合各方面的因素，在煤矿地质测量网络报表系统中选择用ODBC读取SQLSERVER的方式。其代 码实现为： CGeologySet：：GetDefauhConnect(){ CString return T(”ODBC；DSN=geodata”)；}／／连接ODBC中的DSN字段 CStringCGeologySet：：GetDefaultSQL(){ retu_rn-T(”[dbo]．[g_HolePara]It)；}／／获取SQL数据库中的表格 2．2通过OLE连接EXCEL 在连接EXCEL之前，首先在EXCEL中定义报表模板，然后在生成报表时调用模板。采用报表模板的方 式，可以不用考虑报表中固定部分的设计(主要包括表头、页眉页脚和报表边框等内容)口】，使得程序与报表 格式在一定程度上相互独立，当报表格式改变时，只需局部改变程序中部分字段的对应关系，而不必重新设 接口，其连接的方法为： void CMsGisReportView：：AutomateExcel(CStringTemplatePath){ ’IRY{CLSIDclsid；』％rkbook wbmybook； if(!pItem一CreateNewItem(dsid)) LPDISPATCH lpDisp； lpDisp=pltem一GetlDispatch()； wbmybook．AttachDispatch(1pDisp)；／／获取EXCEL对象接13}} 2．3报表的填写、存储与打印 报表的填写，是根据数据字段找到相应的报表模板单元格，进行填写，而存储和打印是报表输出的主要 内容，具体实现为： 2 excelappwbmybook．GetApplication()； wssm