你好,游客 登录 注册 搜索
背景:
阅读新闻

如何让两台服务器上的mdb数据库数据的互访

[日期:2007-02-08] 来源:  作者:未知 [字体: ]
以前看到很多网友问,自己有两台服务器,如何这两台服务器上的mdb数据库数据的互访。今
天作了个远程的接口,以xml形式返回mdb中的数据。用的主要思想是通过recordset对象?
膕ave方法将数据填充到一个xml dom里,但是,这种方法产生的XML不够简洁,自动产生的XML包
含了schema信息,它描述这个XML里允许有什么节点和属性以及采用何种数据类型,而且数据
节点也增加了名称空间。schema信息在需要数据验证的地方或进行更复杂的处理或许很有用,
但是,大多数情况下,我们使用的是瘦客户机,我们不需要schema信息。我们可以利用XSLT来
分离出我们想要的信息,去掉多余的信息。

代码如下:
<%
'生成xsl样式
str = chr(13)&chr(10)&chr(9)
xslt="<?xml version=""1.0""?>" & chr(13)&chr(10) & "<xsl:stylesheet version=""1.
0"""_
&" xmlns:xsl=""http://www.w3.org/1999/XSL/Transform"""_
&" xmlns:s=""uuid:BDC6E3F0-6DA3-11d1-A2A3-00AA00C14882"""_
&" xmlns:dt=""uuid:C2F41010-65B3-11d1-A29F-00AA00C14882"""_
&" xmlns:rs=""urn:schemas-microsoft-com:rowset"""_
&" xmlns:z=""#RowsetSchema"">"& str_
& "<xsl:output omit-xml-declaration=""yes""/>"&str_
& "<xsl:template match=""/"">"& str&chr(9)_
& "<xsl:element name=""xml"">"& str&chr(9)&chr(9)_
&"<xsl:for-each select=""/xml/rs:data/z:row"">"& str&chr(9)&chr(9)&chr(9)_
&"<xsl:element name=""row"">"& str&chr(9)&chr(9)&chr(9)&chr(9)_
&"<xsl:for-each select=""@*"">"& str&chr(9)&chr(9)&chr(9)&chr(9)&chr(9)_
& "<xsl:element name=""{name()}"">"& str&chr(9)&chr(9)&chr(9)&chr(9)&chr(9)&chr(
9)_
& "<xsl:value-of select="".""/>"& str&chr(9)&chr(9)&chr(9)&chr(9)&chr(9)_
&"</xsl:element>"& str&chr(9)&chr(9)&chr(9)&chr(9)_
& "</xsl:for-each>"& str&chr(9)&chr(9)&chr(9)_
& "</xsl:element>"& str&chr(9)&chr(9)_
&"</xsl:for-each>"& str&chr(9)_
&"</xsl:element>"& str_
&"</xsl:template>"& chr(13)&chr(10)_
&"</xsl:stylesheet>"

'读取数据库
curDir = Server.MapPath("data.mdb")
set conn=server.createobject("adodb.connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & curDir
set rs=conn.Execute("select * from admins")
Dim objXMLDOM
Set objXMLDOM = Server.CreateObject("MSXML2.DOMDocument.3.0")
'将recordset对象保存到dom里
rs.save objXMLDOM, 1
Set rs = Nothing
Dim strCleanXML, objXMLDOM_XSLT
Set objXMLDOM_XSLT = CreateObject("MSXML2.DOMDocument")
objXMLDOM_XSLT.loadXml(xslt)
'用xsl格式化数据
strCleanXML = objXMLDOM.transformNode(objXMLDOM_XSLT)

Set objXMLDOM = Nothing
Set objXMLDOM_XSLT = Nothing
'输出数据
Response.Write strCleanXML
%>

因为xml是跨平台的,所以呢不论是asp还是jsp或者客户端都可以通过该接口获得数据,然后
用自己的样式来显示数据。比如,在客户端我们可以使用javascript操作xmlhttp来获得www
.xxxx.com上某个mdb的数据:
<script language="javascript">
function req(){
var xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
xmlhttp.Open("GET", "http://www.xxxx.com/mdb_inerface.asp", false);
'mdb_interface.asp既为放在www.xxxx.com上的mdb接口文件
xmlhttp.Send();
alert(xmlhttp.responseText);
}
</script>
</HEAD>
<body>
<input type="button" onclick="req();" value=" 获 取 " /></br>
收藏 推荐 打印 | 阅读:
本文评论   查看全部评论 (0)
表情: 表情 姓名: 字数
点评:
       
评论声明
  • 尊重网上道德,遵守中华人民共和国的各项有关法律法规
  • 承担一切因您的行为而直接或间接导致的民事或刑事法律责任
  • 本站管理人员有权保留或删除其管辖留言中的任意内容
  • 本站有权在网站内转载或引用您的评论
  • 参与本评论即表明您已经阅读并接受上述条款
相关新闻      
热门评论