2005-11-05 20:46:19 
一笑^_^@-MZ7x 
基于XML的WEB系统报表精确打印实现
王春红 何志林
（运城学院计算机科学与技术系，山西 运城 044000）
摘 要：XML及其相关技术日益渗透到计算机科学的各个层面。针对XML的特点，给出了一个利用XML有效解决B/S结构中客户端快速精确打印报表方法，并以所开发的运城市城建局建设工程交易中心招投标管理系统作为实例说明了这一方案在Microsoft ASP.net平台中的实现过程。该方案实现简单，可扩充性好，且易于维护。
关键字：XML WEB打印 数据交换 WEB服务 WEB票据打印
Exact Report Printing of WEB System Based on XML
（chunhong-wang zhilin-he）
（Computer & Science Department of YunCheng University ）
Abstract: XML and its relevant technology have been found at all the levels of the computer science. By exploiting its features, a method of quick and exact report printing of sheet has been offered. This method has also been exemplified in the platform of Microsoft ASP.net by an example of bidding system designed for YunCheng Construction Trade of Center, Bureau of Urban Construction. The result shows that this method is simple, and easy to expand and maintain.
Keywords: XML WEB Printing Data Exchange WEB Service WEB Printing of Receipt
0引言
近年来，随着宽带网络的普及和推广，基于局域网的C/S结构的应该程序越来越不能满足企业信息化的需要，而基于浏览器的B/S结构的应用程序则越来越广泛。B/S结构的应用程序客户端免安装、免配置、免维护、免升级；服务器端则采用多层模式，将表示层、商业逻辑层和数据层分开，极大的提高了开发的效率和数据的安全性。目前基于B/S结构的应用程序已成为软件开发的主流。但是B/S结构也存在一些缺点，比如，灵活的Web报表打印实现，尤其是一些发票的精确套打更不容易实现！
现有的Web打印控制技术分成几种方案：主要有（1）自定义控件完成打印；（2）利用IE自带的WebBrowser控件实现打印；（3）利用第三方控件实现打印。利用IE打印过于简单，无法实现复杂的票据打印要求，利用第三方控件会往往需要付一定的费用，并且使系统安装部署复杂。自定义控件方式就是利用VB或VC等工具生成COM组件，或者用.net生成.net组件，用定义好的打印格式来分析打印源文件从而实现打印。利用XML可以非常容易地定义打印目标的文本、表格等内容的格式，轻松实现各种复杂的打印需要。本文介绍一种在.net平台下基于XML技术构建.net打印组件从而实现WEB系统的精确打印。
1、XML特性
XML以其良好的数据组织结构和可扩展的特性，成为描述各种复杂数据，特别是结构化数据的良好工具。另外，XML还允许为特定的应用制定特殊的数据。具有以下一些特点：
a) 严格的规范、清晰的语义
b) 数据的共享与重用
c) 良好的扩展性
d) 平台无关性
基于以上的特点，利于XML良好的扩展性和平台无关性完全可以自定义出我们所有需要的格式控制标签，根据服务器端定义的打印格式从客户端直接控制打印机打印，从而实现跨平台的通用报表打印。
2、系统原理
利用XML强大的自定义功能，我们便能方便的自定义出我们所需要的格式控制标签，在服
务器端进行动态编码后通过WEB服务器传到客户端，然后在客户端进行格式解析，根据服务器端定义的打印格式从客户端直接控制打印机打印出我们需要的报表。如图1所示：
图1系统原理设计
我们采用.NET framework的winform做一个打印控件，该控件可以直接嵌入到网页中实现打印功能，但嵌入到网页中的控件一般无法直接连接到数据库，因此只能采用XML文件进行中间数据交换格式，通过普通WEB服务器的默认80端口进行数据传输。当然，我们也可以采用使用SOAP传输数据的Web Service来直接从数据库提取数据，从原理上看，应该和我们采用的XML属于同种类技术。
由于现在的大部分数据库都支持XML格式的数据查询和转换，如SQL Server 2000，Oracle 9i，IBM DB2等大型关系型数据库。只需要通过简单的设置就能直接进行XML数据转换工作。如果数据库不能支持直接XML数据转换，也可以用JSP，ASP，PHP等服务器端脚本程序进行脚本转换工作。
客户端也不需要任何特殊的设置工作，仅需要安装一个大小为21M的.NET framework分发包，然后直接打开网页就可以进行工作。也没有操作系统限制，从windows 98到windows xp都能很好的支持。
由于采用的是XML标准数据格式作为中间数据交换，因此本解决方案具有非常好伸缩性，例如，客户端的.NET控件可以采用JAVA APPLET、ACTIVX或者是VB，VC等编写的客户端应用程序直接替换。服务器也可以任意选择采用IIS或APACHE等WEB服务器。数据库也可以采用任意一种数据库。包括SQL Server，Oracle或者是Access等。
由于采用的是普通WEB服务器传送数据，因此可以直接采用SSL安全套接字等已经成熟的WEB加密技术。同时还可以对XML进行数据算法加密，在客户端再进行解密，保证了传输的安全性。
3、系统实现
首先我们用VB.net设计一个XML打印控件，该控件可以从本地或WEB上的文件，甚至WEB Service加载XML格式的报表文件，然后根据XML报表中的定义，将报表中的线、框、文本提取出来形成一个PrintDocument打印文档进行预览或打印。
将生成的DLL控件复制到WEB系统所在的目录，并在需要打印的WEB页面上，用<Object>
标签将控件插入WEB页面，并通过JavaScript将WEB服务器动态生成的XML报表文件以参数方式传给打印控件，从而实现在WEB页面上的灵活精确打印！
下面以运城市城建局建设工程交易中心网络办公系统为例，介绍基于XML利用.Net打印控件实现招投标档案自定义报表的方法。首先我们利用ASP.NET构建WEB网络办公平台，实现基本的档案管理，招投标流程管理；图2所示为一工程报建界面！因本页面的资料需要打印存档，所以在该页面嵌入.Net报表打印控件，并通过JavaScript脚本将页面生成的工程报建表XML报表文件传给打印控件，单击打印按钮，就会打开工程报建表打印预览界面，如下图3所示。
图2
图3
用于打印的XML报表格式如下：
<?xml version="1.0" encoding="utf-8" ?>
<root>
<Reportsetting> /*报表页面设置*/
<landscape>true</landscape><papertype>A4</papertype>
<paperwidth>2100</paperwidth><paperheight>2970</paperheight>
< leftmargin>100</ leftmargin>< rightmargin>100</ rightmargin>
< topmargin>100</ topmargin>< bottommargin>100</ bottommargin>
</ Reportsetting >
<ReportDetail> /*报表内容*/
<text x="380" y="65" fontname="黑体" fontsize="20"
fontcolor="black" b="true" i="false" u="true"> 运城市建设工程报建表</text>
<text x="100" y="120" fontname="宋体" fontsize="12" fontcolor="black" b="true" i="false" u="true">日 期:2005-05-01 </text> /*定义文本*/
...
<rect x = "90" y="160" width="980" height ="540" border ="2" bordercolor="black" /> /*定义矩型*/
...
<line x1="650" y1="460" x2="1070" y2 ="460" border ="1" bordercolor="Black" /> /*定义线*/
...
<data x="510" y="430" fontname="宋体" fontsize="12" fontcolor="Black" b="true" i="false" u="true">办公大楼</text> /*定义打印数据*/
...
</ReportDetail >
</root>
读取XML报表并进行解析和打印控制函数
Private Sub PagePrint(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
Dim g As Graphics = ev.Graphics
Dim LastPage As Boolean = False
Dim pntElement As xmlPrint.PrintElement = Nothing '声明打印解析类
Dim node As XmlNode
For Each node In doc("root")("ReportDetail").ChildNodes
'载入XML报表文件，并解析报表内容
pntElement = xmlPrint.Parser.CreateElement(node)
'调用解析器生成相应的对象
Try
LastPage = pntElement.Draw(g)
'是否需要分页
Catch ex As Exception
Me.lblMsg.Text = ex.Message
'是否需要分页
End Try
Next node
ev.LastPage = LastPage
End Sub
报表中画线的实现函数部分代码如下：
Public Class Line Inherits PntElement
'XML报表解析类中画线函数
Public Sub New(ByVal Line As XmlNode)
_node = Line'传入的打印数据，即一个XML的NODE
End Sub
Public Overrides Function Draw(ByVal g As Graphics) As Boolean '画线函数
Dim S as String
Dim slgBorder as Single
S=_node.Attributes("bordercolor").InnerText)
slgBorder = Single.Parse(
_node.Attributes("border").InnerText)
Dim pen As New
Pen(Color.FromName(S),sglBorder) '定义画笔
Dim x1,x2,y1,y2 as Single '从XML中提取坐标
X1=Single.Parse(_node.Attributes("x1").InnerText)
X2=Single.Parse(_node.Attributes("x2").InnerText)
Y1=Single.Parse(_node.Attributes("y1").InnerText)
Y2=Single.Parse(_node.Attributes("y2").InnerText)
g.DrawLine(pen,x1,y1,x2,y) '