远程（如通过互联网）连接access数据库的方法

韩冰

前段时间很多人问远程（如通过互联网）连接access数据库的方法，最近写了个例子，与大家共享：

' H. L' W7 e5 r0 N) X4 X
' W1 ~' t' q4 H/ A<>
% B: P) F" S5 ?, z- n2 v使用了TCP/IP，ADO及XML（需要安装Microsoft XML 4.0。）。分服务器和客户端两部分，服务器可以多用户同时连接。远程连接Access数据库有很多方法，我以前已经比较详细的回答过（见下面所列的5种方法），我现在这个例子属于其中的第３种方法（不需要使用RDS或Web服务器）。</P>
" ]; V1 }; u& y5 Z' P3 N<>－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－</P>
<>远程连接access数据库的几个方法：</P>
<>１．建立VPN(Virtual Private Network)，这样你的电脑和主机的连接就与局域网无异，然后把服务器中mdb文件所在的Folder共享即可。ADO连接如下：
oConn.Open "rovider=Microsoft.Jet.OLEDB.4.0;Data Source=\\ServerName\DatabaseFolder\Database.mdb;Jet OLEDBatabase Password=databasepwersist Security Info=False"</P>
* k5 y3 m* n! u<>２．把Database放在Web Server上，使ADO或RDO通过RDS（Remote Data Service）及IIS来实现：</P>
<>如果服务器像上面Jave大侠说那样设置了ODBC DSN的话：</P>
/ j2 `$ p; B. u, |2 ]1 [/ W7 s% O2 y' a<>oConn.Open "rovider=MS Remote;" &amp; _
/ a9 M1 u5 {  V; G/ d% r7 I　　　　　 "Remote Server=http://myServerName;" &amp; _
　　　　　 "Remote Provider=MSDASQL;" &amp; _
4 ^: C- W- b6 O　　　　　 "DSN=AdvWorks;" &amp; _
1 r. b" @* `: n- [" t. ~7 \　　　　　 "Uid=myUsername;" &amp; _
　　　　　 "wd=myPassword" </P>
  v' ?4 u5 ?; {! o<>如果设置的是OLE DB Provider 的话：</P>
<>
; O1 w4 G+ w* V! eoConn.Open "rovider=MS Remote;" &amp; _
　　　　　 "Remote Server=http://myServerName;" &amp; _
5 Z9 F  J0 D; f　　　　　 "Remote Provider=Microsoft.Jet.OLEDB.4.0;" &amp; _
, F9 v$ K2 m9 `" D　　　　　 "Data Source=c:\somepath\mydb.mdb", _
　　　　　　"admin", ""</P>
<>３．自己编写服务器程序，通过TCP/IP，传递Recordset。</P>
<>４．使用第三方控件，如：ADO Anywhere或UDAParts RDB等。具体查看
http://www.adoanywhere.com
+ J% r" m! c' i% d- uhttp://www.udaparts.com/</P>
<>５．使用XMLHTTP</P>
<>－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－</P>
<>附　远程连接SQL Server的方法：
ConnStr = "rovider=SQLOLEDB.1;Network Library=DBMSSOCNersist Security Info=True;User ID=UserNameassword=Password;Initial Catalog=远程数据库名;Data Source=203.129.92.1"
</P>