- 在线时间
- 0 小时
- 最后登录
- 2007-9-23
- 注册时间
- 2004-9-10
- 听众数
- 3
- 收听数
- 0
- 能力
- 0 分
- 体力
- 9975 点
- 威望
- 7 点
- 阅读权限
- 150
- 积分
- 4048
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 1893
- 主题
- 823
- 精华
- 2
- 分享
- 0
- 好友
- 0

我的地盘我做主
该用户从未签到
 |
前段时间很多人问远程(如通过互联网)连接access数据库的方法,最近写了个例子,与大家共享: - X9 Z6 E( u, K
2 W- m! `3 D+ ^# g2 t( K' a* |/ V1 A2 G5 L: N- O! P* H
< >
2 D; z7 L3 _/ ?' u w9 V* T- r使用了TCP/IP,ADO及XML(需要安装Microsoft XML 4.0。)。分服务器和客户端两部分,服务器可以多用户同时连接。远程连接Access数据库有很多方法,我以前已经比较详细的回答过(见下面所列的5种方法),我现在这个例子属于其中的第3种方法(不需要使用RDS或Web服务器)。</P>+ L/ i4 z$ C+ Y8 d
< >-------------------------------------</P>
) G( B) ]) S8 |% j% v7 c+ z6 N< >远程连接access数据库的几个方法:</P>
- v, j) w* J3 z< >1.建立VPN(Virtual Private Network),这样你的电脑和主机的连接就与局域网无异,然后把服务器中mdb文件所在的Folder共享即可。ADO连接如下:9 A F# d, d" y. U H& c9 c- T8 a
oConn.Open " rovider=Microsoft.Jet.OLEDB.4.0;Data Source=\\ServerName\DatabaseFolder\Database.mdb;Jet OLEDB atabase Password=databasepw ersist Security Info=False"</P>
( L* w8 w( R* N& ?< >2.把Database放在Web Server上,使ADO或RDO通过RDS(Remote Data Service)及IIS来实现:</P>
0 X. V% n- a6 M, W9 K< >如果服务器像上面Jave大侠说那样设置了ODBC DSN的话:</P>$ v, T( {+ V7 A
< >oConn.Open " rovider=MS Remote;" & _9 b7 O5 d1 G% Z7 Y9 B* L+ @9 s! ]4 F
"Remote Server=http://myServerName;" & _ 5 K4 x( b( V) t4 d9 @" Z
"Remote Provider=MSDASQL;" & _0 q# N. K) u$ c& q
"DSN=AdvWorks;" & _
% R# m% y2 u0 |9 g. ^+ f, u "Uid=myUsername;" & _8 s" ?, Y, k( h g9 c4 s
" wd=myPassword" </P>
7 L, b: F7 m* y< >如果设置的是OLE DB Provider 的话:</P>
- u# u4 c% J" z8 u+ J< >
( |0 h& o4 C3 s* P8 y: w* loConn.Open " rovider=MS Remote;" & _
# ~ P4 p. P' B" w7 Z+ f2 M) o3 y "Remote Server=http://myServerName;" & _ t6 t @( X: D' [1 b
"Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _) }; T! `' M$ Q; o$ y
"Data Source=c:\somepath\mydb.mdb", _
l0 `1 Q% N7 c4 ]4 _& x1 | "admin", ""</P># }, P/ ^) O8 V2 H8 Z
< >3.自己编写服务器程序,通过TCP/IP,传递Recordset。</P>
" u& }3 m u1 g: y& N6 M( `' g1 D< >4.使用第三方控件,如:ADO Anywhere或UDAParts RDB等。具体查看
2 u* b/ ?6 R" n5 f: q2 B jhttp://www.adoanywhere.com1 s) ?# ~" {0 `$ J B3 r( b* P4 n
http://www.udaparts.com/</P>
# R% q7 B4 J4 U( S8 \7 ?+ R< >5.使用XMLHTTP</P>
# {( r) M3 ?. F< >--------------------------------------</P>+ s$ ?/ r$ l$ ^6 W7 T8 M: p8 h
< >附 远程连接SQL Server的方法:4 I' H/ u2 x3 p8 n/ k+ p
ConnStr = " rovider=SQLOLEDB.1;Network Library=DBMSSOCN ersist Security Info=True;User ID=UserName assword=Password;Initial Catalog=远程数据库名;Data Source=203.129.92.1"
) D( p+ p# G$ Z5 V2 @( j</P> |
zan
|