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

我的地盘我做主
该用户从未签到
 |
前段时间很多人问远程(如通过互联网)连接access数据库的方法,最近写了个例子,与大家共享: ; R4 k) R0 s- C# o
; P% }" C) j c, S) p1 O
* Z7 T; h9 J, C' T& N) D; l< >5 V3 S% T: w2 W6 b
使用了TCP/IP,ADO及XML(需要安装Microsoft XML 4.0。)。分服务器和客户端两部分,服务器可以多用户同时连接。远程连接Access数据库有很多方法,我以前已经比较详细的回答过(见下面所列的5种方法),我现在这个例子属于其中的第3种方法(不需要使用RDS或Web服务器)。</P>; C1 Q5 R. m4 ~ Z
< >-------------------------------------</P># q/ X |3 I" y# s/ s
< >远程连接access数据库的几个方法:</P>
" F2 a* V# `) k" {< >1.建立VPN(Virtual Private Network),这样你的电脑和主机的连接就与局域网无异,然后把服务器中mdb文件所在的Folder共享即可。ADO连接如下:
. v! Z- a. @: w- c4 FoConn.Open " rovider=Microsoft.Jet.OLEDB.4.0;Data Source=\\ServerName\DatabaseFolder\Database.mdb;Jet OLEDB atabase Password=databasepw ersist Security Info=False"</P>) e( R8 ~6 q: P1 F( s$ @
< >2.把Database放在Web Server上,使ADO或RDO通过RDS(Remote Data Service)及IIS来实现:</P>
6 J u, v7 ^2 A; @< >如果服务器像上面Jave大侠说那样设置了ODBC DSN的话:</P>
. r* ^$ y* h% H4 C' ?- s/ m( Z< >oConn.Open " rovider=MS Remote;" & _
; R, |2 V6 f- \ O5 b. v. s "Remote Server=http://myServerName;" & _
M# [- R% t6 _3 R5 \' ~# @! S "Remote Provider=MSDASQL;" & _1 l2 G1 s2 d' |, x
"DSN=AdvWorks;" & _
+ S- i) e& h' ~ "Uid=myUsername;" & _
5 `* a0 x. n! p " wd=myPassword" </P># J4 e9 _# Z4 J9 v2 _/ ]" X: L7 j
< >如果设置的是OLE DB Provider 的话:</P>
0 l" b. {# V+ ^. `) j! i2 `, z< >4 ?7 R9 I6 J, I2 y2 k& z
oConn.Open " rovider=MS Remote;" & _ ( A; Y. `! m! q4 C0 |6 J! c
"Remote Server=http://myServerName;" & _
/ A2 n' U6 T/ b* ~* Z$ X/ `9 k( _ "Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _( f7 c; W/ B9 Y5 ~7 W, U1 u- m3 g
"Data Source=c:\somepath\mydb.mdb", _
9 H$ |9 ?0 E- W/ l7 m" ^ "admin", ""</P>% Q* h& V) G6 X) E; B2 F
< >3.自己编写服务器程序,通过TCP/IP,传递Recordset。</P>
: E; Z! Z+ c& f( Y' w% l9 n. B$ B< >4.使用第三方控件,如:ADO Anywhere或UDAParts RDB等。具体查看0 Q, X- A9 X, F% S0 O
http://www.adoanywhere.com! Y( G7 s; i9 _* v0 p8 G
http://www.udaparts.com/</P>" |6 K$ v8 u. R
< >5.使用XMLHTTP</P>
0 a1 S5 q: w1 A, l1 U. V< >--------------------------------------</P>! \& A" |4 b+ g, Q9 A( n
< >附 远程连接SQL Server的方法:; R1 m2 `, C- K9 r" R
ConnStr = " rovider=SQLOLEDB.1;Network Library=DBMSSOCN ersist Security Info=True;User ID=UserName assword=Password;Initial Catalog=远程数据库名;Data Source=203.129.92.1"
0 U( P" [* ?/ _- b" J+ ~/ r</P> |
zan
|