VB替换整个ACCESS数据库代码. 为了避免多人同时使用一个数据库不稳定,请高手帮忙!特别感谢!!!!

1、若多用户仅仅是查询数据库，可以按你的思路做。

2、若复制到个人的电脑里后， 要对本地数据库进行修改（增删改），那“公用资料夹”中的数据库就不是最新的了。这样每个用户都修改自己的本地数据库，最后就有多个内容不同的数据库，要把这些不同的数据库合并后才可复制到“公用资料夹”中，做为最新的数据库。

3、多用户情况下，最好使用有事务处理的数据库（SQL Server），在同一时刻只能有一个用户 *** 作数据库，保证了每次 *** 作时数据库都是最新的。

4、或者在Access数据库增加“增删改”标志，当此标志为True时，表示有人在修改数据库， *** 作完成后，再将此标志设为False，其他用户要等待此标志变为False才能修改数据库。

Net中的数据库类，System.Data.OleDb（如果在前面的段落是指这个类，然后后面会不会写

System.Data.OleDb

A）

？

1，第一条语句是一个连接，这种连接是连接到数据库：昏暗的美国有线电视新闻网_a作为新的System.Data.OleDb.OleDbConnection（“供应商= Microsoft.Jet.OLEDB.4.0数据源= C：\ 123.mdb （这是你的地址数据库）

）

2，连接到数据库：cnn_a.open

3，报关暗淡cmd_a新的数据库 *** 作命令：

System.Data.OleDb.OleDbCommand（“这是你想要的命令对数据库进行 *** 作??，如SELECT，UPDATE .. SQL语句cnn_a的）

4执行SQL *** 作命令：cmd_a。

的ExecuteNonQuery（）

5，垃圾桶。 。 。子，学生。 。 。

1、对于选中的记录修改其字段值，然后更新记录集即可。

2、工具：vb6

3、用adodc连接数据库，用find方法（也可以使用其它方法）选中记录，用Fields().Value修改字段值，用update更新记录集，代码示例如下：

Private Sub Form_Load()

   Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0" & _

           "Data Source=C:\db1.mdbPersist Security Info=False"

   Adodc1.RecordSource = "select * from Categories"

   Adodc1.CursorLocation = adUseClient

   Adodc1.Refresh

   Debug.Print Adodc1.Recordset.RecordCount

   Set DataGrid1.DataSource = Adodc1

End Sub

Private Sub Command1_Click()

   Adodc1.Recordset.Find "CategoryID=" & Val(Text1.Text)

End Sub

Private Sub Command2_Click()

  Adodc1.Recordset.Fields("CategoryName").Value = Text2.Text

  Adodc1.Recordset.Update

  Adodc1.Recordset.Requery

  

End Sub

4、注意：本例中可以不使用Requery重新查询，但使用它是好习惯。

---