【发布时间】:2015-04-14 04:25:01
【问题描述】:
我通过使用 ms access 2003 和 vb6.0 作为我的项目完成了一个 ERP 系统,但是,当我为我的项目进行测试时,我发现了一个问题,即 ms access 2003 仅适用于 1 个人电脑用户,我需要它是不同电脑中的多用户并且能够同时进行读/写,任何人都可以告诉我应该如何使我的系统成为多用户系统?附上我对 adodb 和 adodc 的部分编码,请帮助我如何使这个 ERP 系统成为多用户,感谢您的帮助。
对于 Adodb:
Dim con As New ADODB.Connection
Dim cmd As New ADODB.Command
Dim rs As New ADODB.Recordset
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\simewood.mdb" & "; Persist Security Info=False;"
con.CursorLocation = adUseClient
con.Open
strSQLmarketing = "select * from tblMarketing where Order_ID = '" & cboOrderID & "' and Model_ID = '" & cboModelID & "'"
With cmd
.ActiveConnection = con
.CommandText = strSQLmarketing
.CommandType = adCmdText
End With
With rs
.CursorType = adOpenStatic
.CursorLocation = adUseClient
.LockType = adLockOptimistic
.Open cmd
End With
对于 Adodc:
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\simewood.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select * from tblLogin where status = 'enabled'"
【问题讨论】:
-
它们都在本地 Windows 网络上吗?
-
not...不在本地网络中,它将被不同区域的多个网络访问
标签: database ms-access vb6 adodb