1、更新
a、主键需要设置好
b、实例代码:
bookcmd = New OleDbDataAdapter(sqlstr, "provider=Microsoft.jet.OLEDB.4.0;data source=C:\Users\Administrator.YATIP54UN9XUK9P\Desktop\毕业设计\web\WebApplication1\WebApplication1\App_Data\biye.mdb")
Dim bookds As DataSet = New DataSet
bookcmd.Fill(bookds, "tblbooks")
Dim booktable As DataTable = New DataTable
booktable = bookds.Tables(0)
Dim bookrow As DataRow
bookrow = booktable.Rows(0)
‘更新此项
bookrow.Item(2) = "1"
Dim objBuilder As OleDbCommandBuilder
objBuilder = New OleDbCommandBuilder(bookcmd)
bookcmd.UpdateCommand = objBuilder.GetUpdateCommand()
bookcmd.Update(bookds, "tblbooks")
2、添加数据项
<