*用VB读写web服务器上的access数据库!**

youyiping 2002-05-09 10:17:06

难道真的访问不了吗？
主机：http://www.friend.com　在其下有一个目录tempuserdir,在其下有一个access数据库：myusersdb.mdb
登录到这台虚似主机的用户名和密码，我都有。可为什么？
我想用VB编程读写这个数据库，难道真的不行吗？
Dim rs As New ADODB.Recordset
Dim cn As New ADODB.Connection
cn.Open "Provider=MS Remote;Data Source=pubs;" & _
"Remote Server=http://www.friend.com/tempuserdir/myusersdb.mdb;"
rs.Open "SELECT * FROM myusers", cn
这样行不通，出现internet服务器错误。我真的搞不懂了，问了许多的朋友，可都没有一个满意的答案。这个Data Source我也不知道。怎么进行访问？但我现在又非要这么做。
请问大家，到底有没有办法来实现？或者哪里有这方面的资料？（我的ADO版本号为2.1，应该是可以的。)

...全文

29 4 打赏收藏举报

写回复

4 条回复

切换为时间正序

当前发帖距今超过3年，不再开放新的回复

发表回复

gaoqi5037 2002-05-09

GZ

打赏
举报

回复赞

sunmoon_beam 2002-05-09

i don't know ,but i want to study it!

打赏
举报

回复赞

QuickSoft 2002-05-09

为什么不用SQL SERVER呢?方便很多的

打赏
举报

回复赞

zyb_8022 2002-05-09

remote server是远程服务器名不应该在这里加上数据库
remote server=主机名
database =数据名

打赏
举报

回复赞

相关推荐

难道真的访问不了吗？主机：http://www.friend.com　在其下有一个目录tempuserdir,在其下有一个access数据库：myusersdb.mdb 登录到这台虚似主机的用户名和密码，我都有。可为什么？我想用VB编程读写这个数据库，难道真的不行吗？ Dim rs As New ADODB.Recordset Dim cn As New ADODB.Connection cn.Open "Provider=MS Remote;Data Source=pubs;" & _ "

本人小菜啊，实在是找不到门路才来求助。以下是模块里的代码。为什么我登陆窗口里的不能调用呢？总报错， Public Function ExeSQL(ByVal Sql As String) As ADODB.Recordset On Error GoTo ErrHandler: Dim Connstr As String Dim CN As ADODB.Connection Dim rs As ADODB.Recordset Dim strArray() As String Dim DataP

Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Private Sub Command1_Click() cn.Close End End Sub Private Sub Form_Load() cn.Provider = "SQLOLEDB.1" cn.Properties("Persist Security Info").Value = "False" cn.Properties("User ID").Value =

Private Sub Form_Load() Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db_sell.mdb" rs.Open "224-", cn, adOpenKeyset, adLockOptimistic Set MSHFlexGrid1.DataSource =

发帖

数据库(包含打印，安装，报表)

1200

社区成员

5.5w+

社区内容

VB 数据库(包含打印，安装，报表)

社区管理员

加入社区

帖子事件

创建了帖子

2002-05-09 10:17

社区公告

暂无公告