Question

vb6.0中怎样远程访问access数据库？

vb6.0做了一考试系统，客户端怎样读写服务端上的access数据库？

Answer 1

在工程里引用microsoft activex data objects 2.7 library

Dim cn As New ADODB.Connection, rs1 As New ADODB.Recordset, sql As String '在通用声明里定义，其中cn是连接对象，rs1是记录集，sql是查询语句
Private Sub Form_Load()
cn.Open "provider=microsoft.jet.oledb.4.0;data source=" + App.Path + "\数据库名.mdb" + ""
sql = "select * from 表名"
rs1.Open sql, cn
rs1.MoveFirst
Do While Not rs1.EOF
Combo1.AddItem rs1("字段名")
rs1.MoveNext
Loop
rs1.Close
End Sub

上面的是打开数据库进行查询，并将查询结果写入列表框
不清楚的留言给我，发一个可以运行的程序给你参考

Answer 2

一样的

只是要把连接字符串多加个计算机名或是IP地址

不过最好不要用Access数据库

据说它只能支持十个以下的用户同时访问

Answer 3

如果你会用本地连接数据库，那很容易呀，主要设置 连接字符串就可以了 connstr 例如 connstr = "driver={SQL Server};server=www;UID=111;PWD=111;database=data1"更多例子(不同的连接方式)在以下网址 http://www.connectionstrings.com/