VB远程连接Access

Question

请问VB如何远程连接Access？而且需要在一个应用程序里面做成全局变量的形式，用类吗？

Answer 1

给了例题你看
Dim cn As New ADODB.Connection
   Dim sql As String
   Dim zf As String
   Dim ip As String
  Dim a As String
  a = Text2.Text
zf = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\" & a & "\局域网数据交换\db1.mdb;User Id=admin;Password="
  '\\服务器名或IP\共享目录名\数据库名.mdb
'zf = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\192.168.0.4\局域网数据交换\db1.mdb"   sql = "insert into xm(xm)values('" & Text1.Text & "')"
    cn.Open zf
    cn.Execute (sql)
cn.Close
Set cn = Nothing

Answer 2

要将数据库所在目录设置成完全共享，安全性不高，建议使用SQL数据库

Answer 3

或者做成C/S结构，客户端用WINSOCK发命令到SERVER，然后SERVER操作数据库。

Answer 4

为什么我用
AdoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;User Id=BMS;Password=bms;Data Source=\\IP地址\共享目录名ta\数据库名"
报错说：工作组文件信息丢失，或是已被其他用户以独占方式打开这是咋回事啊！

Answer 5

如果使用WinSock控件，那么如何操作数据库呢？

Answer 6

你把对方机器上的ACCESS的密码去掉看看能不能连上!!我以前连本地的机器的时候碰到过这样的问题!

Answer 7

"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\IP地址\共享目录名\数据库名;Jet OLEDB:Database Password=密码"
这样就可以了你试试

Answer 8

远程计算机的Acess没有密码啊，而且是在局域网中的机器