VB远程访问数据库。

Question

在网上有一固定IP，（当然也可能是在局域网中）我把它作为放数据库的服务器，服务器配置在WEB服务器，然后将access数据库放在网站文件夹的一目录中（如C：\inetpub\wwwroot\下，然后我想在别的机子上来访问这个数据库，能做到吗？用VB最好能给详细的代码。高分求教！

Answer 1

应该就是用RDS吧！请高手给详细的代码，还有服务器的IIS设置！

Answer 2

回复人： chenyu5188(蓝色情调) ( ) 信誉：100  2003-2-21 2:17:11  得分:0 
 
 
  
用ADO对象怎么用啊？？ 
 

Answer 3

'我这里有个连接远程sqlserver数据库的ado连接方法
'computername为机器名称，不知道IP地址可不可以，conn.ConnectionString ="driver={SQL Server};server=computername;database=aest;UID=sa;PWD=;"

Answer 4

我要的是远程连接ACCESS数据！！！

Answer 5

如果是共享那么简单我也不用这么问1我记得ACCESS也可以的！用RdS应该可以实现！就是不知道怎么做！UP者加分啊！

Answer 6

MS Remote - Access (Jet) 
If you want to use an ODBC DSN on the remote machineoConn.Open "Provider=MS Remote;" & _
           "Remote Server=http://myServerName;" & _ 
           "Remote Provider=MSDASQL;" & _
           "DSN=AdvWorks;" & _
           "Uid=myUsername;" & _
           "Pwd=myPassword" 
 
If you want to use an OLE DB Provider on the remote machineoConn.Open "Provider=MS Remote;" & _ 
           "Remote Server=http://myServerName;" & _
           "Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=c:\somepath\mydb.mdb", _
            "admin", ""
 
If you want to use an OLE DB Provider on the remote machineoConn.Open "Provider=MS Remote;" & _ 
           "Remote Server=http://myServerName;" & _
           "Handler=MSDFMAP.Handler;" & _
           "Data Source=MyAdvworksConn"
The corresponding entry in the \winnt\Msdfmap.ini file would be:[connect MyAdvworksConn]
Access = ReadWrite
Connect = "Provider=Microsoft.Jet.OLEDB.4.0;
           Data Source=mydb.mdb;
           User Id=admin; 
           Password="               (put all of this on single line!)

Answer 7

这次我做了一个Access的非本机访问的程序，
感觉很不安全啊，老是怕网络连接的时候出错误。
远程访问最好用SQLServer之类的数据库服务器。

Answer 8

那如果说我的是sql的怎么办？我想问下怎么知道uid 和pwd

Answer 9

用远程access的前提应该是对数据库目录有写权限吧，金蝶、用友以前的网络版软件都是这样的。

Answer 10

远程访问ACCESS数据库的连接字符为：
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=\\myServer\myShare\myPath\myDb.mdb"data source 在你的程序中改成你自己的路径。
myServer为远程机器名
 

Answer 11

服务器端做一个 DNS ，客户端也在 DNS 中与服务器端的 DNS 相连，然后在客户端的程序中调用本地的 DNS 就可以了，关键是两端的 DNS 的配置。我以前曾经实现过，可以的。

Answer 12

楼上讲的是一种最直接的方法
金蝶、用友用的不是ACCESS数据库：）
如果你想连远程数据库建议你还是用SQLSERVER这类的数据库

Answer 13

ForrestSun(佑佑) ，我讲的是“以前”金蝶、用友用ACCESS。不是说一直在用。
现在当然有sql和其他版本的了。
我从96年开始用他们的软件，很清楚。

Answer 14

把这个数据库放在源文件同一目录下利用虚拟目录房问他就可以移植
如说
option explicit
private sub form_load()
  set cn=createobject("adodb.connection")
      rem 注意一定要在同一目录下否则的话系统访问他时会说找不到数据库
      path=app.path+"\系统"+"\你的数据库文件名.mdb"
         cn.open "provider=microsoft.jet.oledb.4.0;data source="& path
 .................

Answer 15

用ODBC.vb中可以直接调用ODBC里面的数据库，也可以新建啊什么的！然后再用ADO来连接就可以控制了阿 ！

Answer 16

可的，帮你搞定。你首先要在VB菜单中：
“工程”－－＞“引用”－－＞“Microsoft AxtiveX Data Objects 2.X Library”
注：2.X为版本号，如果你机子上有高版本的就用高版本的，如：2.5或2.6的Private Sub ComOK_Click()
   Dim SQLstr As String,cnstr AS String
　 Dim cn AS New ADODB.Connection'连接对象
   Dim rs As New ADODB.Recordset'记录集对象
   cnstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=\\myServer\inetpub\wwwroot\yourdb.mdb" '连接字符串
   cn.open' 打开数据库连接
   rs.CursorLocation =adUseClient
   sqlstr="slect * from XXX表"
   rs.open sqlstr,cn,3,3'执行SQL语句，并返回记录
   set datagrid1.datasource=rs
   datagrid1.refresh
   rs.close'关闭记录集对象
   set rs=nothing
End Sub本示例是将数据库中的一张表的记录显示在datagrid的控件中。

Answer 17

在Windows 2000下面，由于RDS的缺省安全配置同IIS4不同，从而造成RDS无法正常使用，以下是本人根据微软 MDAC 2.6 SDK 的 ADO 文档中关于RDS的说明部分翻译并整理总结而成的配置步骤，在我所配置的服务器中都获得成功，现供大家参考。1、用“计算机管理”工具查看 IUSR_<ComputerName> 用户是否在Guests 组中，如果没有请加入。2、单击“开始”－“运行”，输入“msdfmap.ini”，按回车编辑该文件，或直接在NT安装目录下找到该文件双击，找到“[CONNECT DEFAULT]”项，如果Access参数的当前值是“NOACCESS”，将其改为“READONLY”。3、运行“Internet服务管理器”，查看“默认Web站点”－“MSADC”虚拟目录的属性，将执行许可设为“脚本和可执行程序”；查看“目录安全性”－“IP地址及域名限制”，改为对所有地址授权访问4、将以下内容另存为后缀名为.reg的注册表文件，并将其导入注册表：
REGEDIT4[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W3SVC\Parameters\ADCLaunch\RDSServer.DataFactory];将RDS的安全级别降低
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\DataFactory][HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\DataFactory\HandlerInfo]
"handlerRequired"=dword:00000000
"DefaultHandler"=""[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\DataFactory\HandlerInfo\safeHandlerList][HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\DataFactory\HandlerInfo\safeHandlerList\MSDFMAP.Handler][HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\DataFactory\HandlerInfo\safeHandlerList\MSDFMAP_VB.Handler][HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\DataFactory\HandlerInfo\safeHandlerList\MSDFMAP_VC.Handler]5、停止并重新启动 WWW 服务，如果上述修改仍不起作用，重新启动服务器。
回复人： fling_boy(andy--天意)(冰狱绝剑) ( ) 信誉：100  2003-2-21 15:35:29  得分:0 
 
 
  
MS Remote - Access (Jet) 
If you want to use an ODBC DSN on the remote machineoConn.Open "Provider=MS Remote;" & _
           "Remote Server=http://myServerName;" & _ 
           "Remote Provider=MSDASQL;" & _
           "DSN=AdvWorks;" & _
           "Uid=myUsername;" & _
           "Pwd=myPassword" 
 
If you want to use an OLE DB Provider on the remote machineoConn.Open "Provider=MS Remote;" & _ 
           "Remote Server=http://myServerName;" & _
           "Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=c:\somepath\mydb.mdb", _
            "admin", ""
 
If you want to use an OLE DB Provider on the remote machineoConn.Open "Provider=MS Remote;" & _ 
           "Remote Server=http://myServerName;" & _
           "Handler=MSDFMAP.Handler;" & _
           "Data Source=MyAdvworksConn"
The corresponding entry in the \winnt\Msdfmap.ini file would be:[connect MyAdvworksConn]
Access = ReadWrite
Connect = "Provider=Microsoft.Jet.OLEDB.4.0;
           Data Source=mydb.mdb;
           User Id=admin; 
           Password="               (put all of this on single line!) 
 在fling_boy(andy--天意)(冰狱绝剑) 的方法之前 加上WIN2000的RDS配置！最后测试程序成功！需看完整代码的请与我联系！