上一篇：防范SQL指令植入式攻击 >>

用asp做access的远程接口

以前看到很多网友问，自己有两台服务器，如何这两台服务器上的mdb数据库数据的互访。今天作了个远程的接口，以xml形式返回mdb中的数据。用的主要思想是通过recordset对象的save方法将数据填充到一个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>

（）

返回顶部

下一篇：ASP.NET虚拟主机存在的重大隐患 >>