用asp做access的远程接口

原创 2004年01月02日 13:39:00

       以前看到很多网友问,自己有两台服务器,如何这两台服务器上的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+ACCESS网站开发流程

  最近要帮一家公司做网站,正好,总结一下这一类网站制作的一般流程。  这是一个ASP+ACCESS的网站,主要用于介绍公司的业务,宣传公司。没有与访问者互动的要求。  依我个人的经验,主要是按下面的...
  • manio
  • manio
  • 2006年01月16日 00:35
  • 2559

基于Access数据库利用ASP平台开发的简单工资管理系统

        上学期学习了数据库这门课程,老师就布置了一个学期的课程设计,有很多题目可以选择,我选择的是工资管理系统。由于大四时间比较紧张,我做了一个很简易的工资管理系统,它包括对数据库最基本的集中...
  • orlando377
  • orlando377
  • 2008年10月10日 15:02
  • 2859

asp网站的access数据库添加修改、写入权限后访问超慢

最近维护到一个asp 网站,前台页面访问速度超慢,用firebug分析,打开的时间主要耗在数据库响应,等待的时间太长。页面代码和数据库都没什么问题。于是,拿出之前备份的源码,重新在iis建了一个新的网...
  • sabic
  • sabic
  • 2012年09月07日 11:29
  • 6028

雅慧教你ASP+ACCESS数据库网页基本操作

1、架设IIS服务器或者直接在网上下载可以直接测试运行ASP的软件; 2、在电脑D盘的根目录下,建立一个名为“Web”的文件夹,在该文件夹下建立“data”、“images”、“css”三个文件...
  • u014624988
  • u014624988
  • 2014年11月19日 19:13
  • 654

64位系统asp连接access数据库

今天在使用asp网站后台时发现在64bit windows2008下,访问数据库失败,报错驱动程序未安装。 网上绝大多数的方法都是到应用程序池的高级设置中,把允许32位程序启用,的确可以解决。这样就...
  • ldl22847
  • ldl22847
  • 2013年07月30日 15:33
  • 1980

【ASP】连接Access数据库的登陆系统

一、基本目标 首先在Access数据库Database.mdb中存在着用户信息表test: 编写一个登陆系统,如果用户输入的用户名在表中没有,则提示“查无此人”,如果输入密码错误,则提示“密码错误...
  • yongh701
  • yongh701
  • 2014年11月10日 10:06
  • 3296

asp 创建 Access 数据库,字段,字段类型

asp 创建 ACCESS数据库,建立字段等操作
  • happyfish2003
  • happyfish2003
  • 2017年09月07日 09:08
  • 213

五个小时学会Asp连接access添加,删除,修改

ASP基础实例教程之五个小时学会Asp连接access添加,删除,修改 (第一个小时) 1:首先建立一个access数据库保存为 xhnew.mdb 表名为aa 字段如下: id 自动排序 name ...
  • form88
  • form88
  • 2017年03月26日 16:01
  • 1753

ASP查询ACCESS库模糊查询like的解决方法

前言:ACCESS的通配符和SQL SERVER的通配符比较===================================================ACCESS库的通配符为: *  与任...
  • blackpark
  • blackpark
  • 2006年05月24日 18:42
  • 3490

ASP中调用Access中的查询

用Asp 写程序时经常会用到 Access 做为后台数据库,Access 相对SQL Server 来说 功能是弱了一点,其中就是数据库段编程功能,前一段时间在网上看到一些用Command 掉用Acc...
  • WDFrog
  • WDFrog
  • 2006年02月27日 17:08
  • 2093
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:用asp做access的远程接口
举报原因:
原因补充:

(最多只允许输入30个字)