如何连接远程数据库ACCESS?

xh4010 · 发表于 2006-8-8 18:53

远程服务器提供WEB服务，想在客户端EXCEL中用VBA实现向服务器数据库读写数据：

Set conn = CreateObject("ADODB.Connection")
    Set rst = CreateObject("ADODB.Recordset")
    conn.Open "Provider=MS Remote;Remote Server =http://192.168.8.144;Remote Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C:/test.mdb"
    sqls = "select * from print_sub"
    rst.Open sqls, conn, 1, 1

运行时出现如下错误：

运行时错误“8447”：internet服务器错误。

这是哪里出了问题？

[此贴子已经被作者于2006-8-8 18:55:57编辑过]

xh4010 · 发表于 2006-8-9 08:10

整了很久，也没解决，请各位帮忙

xh4010 · 发表于 2006-8-9 11:53

版主帮忙啊

qee用 · 发表于 2006-8-9 13:17

我这儿没有调试环境,从表述上似乎看不出问题.注意到连接串没有提供访问者身份和密码,权限够吗?
另外,提示internet服务器错误,也可能是对方服务器的问题.

xh4010 · 发表于 2006-8-9 20:25

上面的问题已解决,可以连上服务器:

Set conn = CreateObject("ADODB.Connection")
Set rst = CreateObject("ADODB.Recordset")
conn_str = "Provider=MS Remote;Remote Server =http://192.168.8.144; Remote Provider=Microsoft.Jet.OLEDB.4.0; Data Source=c:\system\AfterPrinting\data\after_pringing.mdb;uid=admin;pwd=601752640"
conn.Open conn_str
sqls = "select * from print_sub"
rst.Open sqls, conn, 1, 1

但又出现了如下错误:

RDS服务器错误：服务器拒绝访问用于访问此页的默认的RDS句柄。请查看“服务器管理员”获得关于服务器的安全设置的更多的信息。

是不是服务器端要进行一些设置? 很郁闷......

xh4010 · 发表于 2006-8-10 09:32

大家快帮忙看看

xh4010 · 发表于 2006-8-10 11:58

已解决，须在正确配置msdfmap.ini

[此贴子已经被作者于2006-8-10 12:15:13编辑过]

qxnljx · 发表于 2008-12-2 20:59

如何正确配置msdfmap.ini 呢，能否贴出来分享呢？

hacker85 · 发表于 2010-3-9 18:22

是啊如何解决呢，一直也没有答案哟！

googao · 发表于 2011-10-22 17:33

留个记号，改天来看看

		自动登录	找回密码
密码			免费注册

[求助] 如何连接远程数据库ACCESS?