微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

SqlServer Studio 链接服务器访问 Access

 

Web 开发中,经常要用到 Access 数据库。但是由于 Access 是一种文件数据库,所以无法跨服务器进行访问。经过笔者的探索,发现可以利用 sql Server 的链接服务器,把地理上分散的 Access 数据库整合起来,使 Access 数据库具有跨越 Web 服务器群的能力。这样做,还可以使 Access 数据库sql Server,甚至 Oracle 等网络数据库连接起来,实现异构数据库的互连,从而执行分布式的查询、更新、命令和事务。

一、创建链接服务器,连接本地 Access 数据库

    创建链接服务器可以用“企业管理器”,也可以执行系统存储过程 sp_addlinkedserver 来完成。用系统存储过程相对快捷一些,格式为:
    sp_addlinkedserver '链接服务器名','产品名','Microsoft.Jet.OLEDB.4.0','Access数据库路径及文件名'

    指定 Microsoft.Jet.OLEDB.4.0 作为 provider_name,指定 Access 数据库文件的完整路径名作为 data_source。.mdb 数据库文件必须驻留在本地服务器上,路径必须是服务器上的有效路径。

    例如,本例创建一个名为 mytest 的链接服务器,对 E:/我的文档/ 文件夹下名为 DOS.mdb 的 Access 数据库进行操作,则在“SQL查询分析器”中执行:

    sp_addlinkedserver 'mytest','Access 2000','E:/我的文档/DOS.mdb'

二、创建链接服务器登录映射

    同样可以用“企业管理器”或存储过程来完成。存储过程的格式为:

    sp_addlinkedsrvlogin '链接服务器',false,'sqlServer登录名','admin',NULL

    为访问非保密的 Access 数据库,试图访问 Access 数据库sql Server 登录应该有一个用户 Admin 定义的没有密码登录映射,下例使得本地用户 sa 可以访问名为 mytest 的链接服务器:

    sp_addlinkedsrvlogin 'mytest','sa',NULL

    要访问保密的 Access 数据库,需使用注册表编辑器配置注册表,以便使用 Access 的正确的工作组信息文件。使用注册表编辑器向该注册表项中添加 Access 使用的工作组信息文件的完整路径名称

    HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Jet/4.0/Engines/SystemDB

    配置了注册表项后,请使用 sp_addlinkedsrvlogin 创建从本地登录到 Access 登录登录映射:

    sp_addlinkedsrvlogin 'mytest','[AccessUser]','[Accesspwd]'

    链接服务器和链接服务器登录映射建立完毕,可以在企业管理器里进行查看。

三、链接服务器的测试

    可以在“SQL查询分析器”里对创建的链接服务器进行测试。由于 Access 数据库没有目录和架构名称,因此,基于 Access 的链接服务器中的表可以在分布式查询中使用 [linked_server]...[table_name] 的四部分名称进行引用。下例从名为 mytest 的链接服务器中检索 articles 表的所有行:

    Select * from mytest...articles

    或:Select * from OpenQuery(mytest,'Select * from .articles')

四、用代码访问链接服务器的 Access 数据库

    只有实现用代码访问链接服务器的 Access 数据库,才使得链接服务器发挥了最大的灵活性和实用性。可以使用三中的测试链接服务器的代码建立存储过程,供 Asp 代码调用,也可以直接在 Asp 代码调用链接服务器,以下是我通过测试的例子:

  <%

  Dim conn,ssql,rs

  conn="Provider=sqloledb; server=localhost; uid=sa; pwd=sqlSERVER;"  '用户 sa 的密码sqlSERVER。可以省略数据库

  on error resume next

  ssql = "select * from mytest...articles"
  Set rs = Server.CreateObject("ADODB.Recordset")
  rs.open ssql,conn,1,1

  rs.movefirst
  response.write rs(0) & "<br>"

  if err.number<>0 then
    response.write "取数据错误数据库连接出错,或存取数据表错误!"
  else
    response.write "OK!"
  end if

  %>

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 [email protected] 举报,一经查实,本站将立刻删除。

相关推荐