VB.NET，将数据从dataset中删除了，如何更新到数据库？

需要声明使用CommandBuilder对象，你是 SQL 数据库还是 ACCESS 数据库，这两者的对象不一样的。

创新互联主营普陀网站建设的网络公司,主营网站建设方案,重庆App定制开发,普陀h5微信小程序开发搭建,普陀网站营销推广欢迎普陀等地区企业咨询

对于：SQL server

Dim Mybuilder As SqlCommandBuilder = New SqlCommandBuilder(da)

da.Update(dt) '使用Update方法实现更新到数据库

对于：ACCESS

Dim Mybuilder As OleDbCommandBuilder = New OleDbCommandBuilder(da)

da.Update(dt) '使用Update方法实现更新到数据库

vb.net 更新access数据

以下是完整模块

Imports System.Data

Imports System.IO

Imports System.Data.OleDb

Module Module1

Public cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ACCESS数据库.mdb") '定义连接---这里请更改为实际数据库路径及名称

Public DataBaseRST As Integer '用来返回数据库执行结果

Public Function DataModify(ByVal str As String) As Boolean '进行数据库修改操作函数

Dim cmdinsert As New OleDbCommand

Try

cmdinsert.CommandText = str

cmdinsert.Connection = cn

If cn.State = ConnectionState.Closed Then cn.Open()

DataBaseRST = cmdinsert.ExecuteNonQuery() '用来返回执行的结果

cn.Close()

Return True

Catch ex As Exception

MessageBox.Show(Err.Description, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

Return False

End Try

End Function

Public Function Search(ByVal str As String, ByVal DGV As DataGridView) As Boolean '查询 str---查询命令，DGV---DataGridView，用来显示数据的控件

Dim tb As New DataTable

Try

Dim ap As New OleDb.OleDbDataAdapter(str, cn)

ap.Fill(tb)

DGV.DataSource = tb

Return True

Catch ex As Exception

MessageBox.Show(Err.Description, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

Return False

End Try

End Function

End Module

'以下是调用方法

DataModify(" insert into aa values ('1','2')")'-------这里是数据库更新操作

Search("select bb from aa",DataGridView1)'-----------这里是数据表查询操作

VB.NET 数据库更新

c#

string[] strMsg = {"Field1",.....};

string[] strFieldValue = {"FieldValue1",...}

stringBuild sb = new stringBuild("update tablename set ");

int index = 0;

foreach(string var in strMsg)

{

sb .append(var + " = " + strFieldValue [index]+",");

}

sb.remove(sb.lenth-1,1);

网页标题：vb.net更新数据集 vb更新数据库代码
分享网址：http://cdweb.net/article/hppgjd.html