- 在线时间
- 0 小时
- 最后登录
- 2007-9-23
- 注册时间
- 2004-9-10
- 听众数
- 3
- 收听数
- 0
- 能力
- 0 分
- 体力
- 9975 点
- 威望
- 7 点
- 阅读权限
- 150
- 积分
- 4048
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 1893
- 主题
- 823
- 精华
- 2
- 分享
- 0
- 好友
- 0
我的地盘我做主
该用户从未签到
|
前段时间很多人问远程(如通过互联网)连接access数据库的方法,最近写了个例子,与大家共享: 3 y4 _4 _# G) K6 C5 X2 N( Z3 t4 |
V z: M7 G, W) I( a: }
- c' g1 M" T% P<>
. Q, \- t- \7 [ t6 d. I, y4 M使用了TCP/IP,ADO及XML(需要安装Microsoft XML 4.0。)。分服务器和客户端两部分,服务器可以多用户同时连接。远程连接Access数据库有很多方法,我以前已经比较详细的回答过(见下面所列的5种方法),我现在这个例子属于其中的第3种方法(不需要使用RDS或Web服务器)。</P>
, L; B* j% a* T<>-------------------------------------</P>
7 B8 ~7 r# t! B1 M<>远程连接access数据库的几个方法:</P>
; v- s% n5 z2 @) M% z! E' _$ l: z6 A<>1.建立VPN(Virtual Private Network),这样你的电脑和主机的连接就与局域网无异,然后把服务器中mdb文件所在的Folder共享即可。ADO连接如下:- x9 N! @1 i$ V' \2 a" M
oConn.Open "rovider=Microsoft.Jet.OLEDB.4.0;Data Source=\\ServerName\DatabaseFolder\Database.mdb;Jet OLEDBatabase Password=databasepwersist Security Info=False"</P>
$ o# o( |0 z u% R# |. M<>2.把Database放在Web Server上,使ADO或RDO通过RDS(Remote Data Service)及IIS来实现:</P>1 X, g4 h6 S8 F
<>如果服务器像上面Jave大侠说那样设置了ODBC DSN的话:</P>
. R. Q% p; h @/ n8 O. p<>oConn.Open "rovider=MS Remote;" & _- S1 C" U& [* |5 E
"Remote Server=http://myServerName;" & _
5 T2 s9 v2 B$ L5 | ? "Remote Provider=MSDASQL;" & _% C) E( ?2 E. p7 j& R! `" ^
"DSN=AdvWorks;" & _
! x6 ]) f, ]* ]* }% k. ~3 f "Uid=myUsername;" & _
. T5 j$ B& O: I# T# G2 Z "wd=myPassword" </P>8 |9 k9 N0 R' z" N' t; b. m
<>如果设置的是OLE DB Provider 的话:</P>
9 w/ ?; u/ e6 ]1 d' q<>
6 l' g3 p4 O B, |1 g; u2 U5 joConn.Open "rovider=MS Remote;" & _
8 Y6 Z2 K0 ^! a+ {2 _6 `+ h3 h3 S "Remote Server=http://myServerName;" & _
( t% w. b# i. E9 f "Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _
& O% [, \5 V: y; a "Data Source=c:\somepath\mydb.mdb", _. Q G' h- q0 }2 [) e3 R$ U
"admin", ""</P>
* d. S3 P: b3 f8 H<>3.自己编写服务器程序,通过TCP/IP,传递Recordset。</P>
. v. W+ \8 ?" D$ K6 N. Q<>4.使用第三方控件,如:ADO Anywhere或UDAParts RDB等。具体查看6 M6 B' @" n4 T4 K2 X
http://www.adoanywhere.com5 x) @& X% G5 X) G% z
http://www.udaparts.com/</P>+ G! g5 J. r% F- e& K. ^9 l* @
<>5.使用XMLHTTP</P>* @) I# G/ ^( l) c/ H9 l
<>--------------------------------------</P>* e- S. T# u% g5 r& R# J
<>附 远程连接SQL Server的方法:
# |" z& q3 P% N; w0 uConnStr = "rovider=SQLOLEDB.1;Network Library=DBMSSOCNersist Security Info=True;User ID=UserNameassword=Password;Initial Catalog=远程数据库名;Data Source=203.129.92.1"
& ~( j& f7 t1 l7 _; j</P> |
zan
|