办公之星控件(http://www.standsoft.com),作为一个优秀的图文混排控件,在B/S架构系统中应用得非常广泛。作为表示层,它可以很好的呈现图文混排的文档、各种复杂的报表、也可以作为数据采集录入的界面,有效的解决了B/S架构系统中客户端的文档显示和打印问题。在实际工作中,我们经常碰到这种场合:文档样式不变,其中的数据(包括图片)允许发生变化,点击“上一个”、“下一个”按钮可进行数据浏览。数据用数据库组织显然是最棒的,那么办公之星控件如何在文档中显示来源于数据库的数据?如何上下浏览数据?
我们分析一下,数据库存储在服务器端,办公之星控件在客户端,要求客户端一定能够完成数据绑定是不现实的,尤其是对于复杂而不规则的报表来说更是如此。这样开发者在数据组织、分析、挖掘上就有了更多的可控空间。而XML由于其优秀的扩展性和灵活性使它允许描述不同种类应用软件中的数据,是数据传输媒体的最佳人选。
在这里我们介绍一种数据岛技术。XML的数据源对象又称数据岛(英文缩写DSO)。数据岛的实现机制是将一个XML文档或一段XML代码当作一个类似于数据库的对象,使用传统操作数据库的方法来操作XML文档中的数据,例如数据的添加、删除、更新和查询。有人也将其称为一个在网络上流动的数据库。另一方面数据岛提供了一种将XML格式数据和表格、文本框等进行绑定的技术。
以下是整个方案框架图:
一、建立数据岛
首先,建立一个一XML文件,将数据库的数据从服务器端取出来。以下是一段ASP示例代码:
<%
response.buffer=true
dim conn
dim connstr
dim db
dim sql,rs
'数据库路径
db="db/db.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
Set rs= Server.CreateObject("ADODB.Recordset")
'取得cell数据表中所有字段
sql="select * from cell"
rs.open sql,conn,1,1
%>
<?xml version="1.0" encoding="gb2312"?>
'通过循环生成XML文档正文
<cells>
<% while not rs.eof
%>
<cell>
<id><%=trim(rs("id"))%></id>
<name><%=trim(rs("name"))%></name>
<***><%=trim(rs("***"))%></***>
</cell>
<%
rs.movenext
wend
rs.close
%>
</cells>
将以上代码存为xml.asp文件。
||||||二、通过记录集管理数据岛
记录是数据库中的一条数据,在关系型数据库中对应了一行数据,所有行数的集合称为记录集。一个记录集包含一条或多条记录(行),每个记录包括一个或多个颍ㄗ侄危1旧鞷ecordset是一套管理数据库的方法,这里完全可以用来管理XML文档。
使用记录集管理XML文档中数据的第一步是创建一个记录集对象;然后再通过该记录集对象的相关属性和方法来管理其中的数据。通过数据岛技术引入外部的XML文档时,一个记录集对象就会被自动创建。
1. 声明记录集
首先定义一个数据岛,然后再调用该数据岛的一个属性从而生成一个记录集,具体语法类似下面程序所示:
<xml id="xmlid" src="xml.asp"></xml>
<script language="vbscript">
set rs=xmlid.recordset
……
</script>
上面语句第一行中id属性是标识数据源的惟一名字,第二个参数src指定了所调用外部XML数据文件的路径。
2. 显示记录集
记录集中的每一条记录都对应数据表中的一行数据。要显示记录集中的所有记录,只要简单地做一个循环,具体的语法类似下面程序:
whild not rs.eof
document.write "<tr><td bgcolor='#99ff99'>"
document.write(rs("id"))
document.write "</td><td bgcolor='#99ff99'>"
document.write(rs("name"))
document.write "</td><td bgcolor='#99ff99'>"
document.write(rs("***"))
document.write "</td></tr>"
rs.movenext
wend
刚打开一个记录集时默认的当前记录是第一条记录,上面方法通过调用记录集对象的MoveNext方法,使当前记录移动到下一条记录。更多方法请参见:
3. 操作记录集的方法
addnew 向记录集中添加一条新记录
delete 从记录集中删除一条记录
MoveFirst 移动到记录集的第一条记录
MoveNext 移动到记录集的下一条记录
MovePrevious 移动到记录集的上一条记录
MoveLast 移动到记录集的最后一条记录
BOF 标明当前位置在记录集中的第一条记录之前。
EOF 标明当前位置在记录集中的最后一条记录之后。
三、办公之星控件中数据显示
数据岛通过办公之星控件显示数据的技术核心是建立XML数据与办公之星控件文档中表格之间的对应关系。办公之星控件提供别名对文档中表格的表元进行操作。
1. 设置别名
在办公之星控件文档编辑器(即办公之星软件)中,对着表格中表元单击鼠标右键,从弹出的右键快捷菜单中选择“设置别名”命令,这时候会弹出一个对话框,在该对话框中输入表元别名。
2. 为别名赋值
办公之星控件中对别名进行赋值的接口方法为:SetFieldvalue "",""
该方法第一个参数为别名名称,第二个参数为具体值。例如将数据岛中name域的内容赋予别名为name的表元,其代码可为:
OStar.SetFieldvalue "name",rs("name")
上面代码中“OStar”是程序中标识办公之星控件的惟一名字,在插入控件时通过id进行设置。