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

VB.NET,将数据从dataset中删除了,如何更新到数据库?,第1张

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

对于: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方法实现更新到数据库

以下是模块模块1

完整的模块

进口System.Data

进口System.IO

进口System.Data.OleDb

CN作为新OleDb.OleDbConnection (供应商= Microsoft.Jet.OLEDB.4.0数据源= C:\ ACCESS数据库的。mdb“)'定义连接---改变到实际的数据库路径和名称

DataBaseRST上的作为整数使用返回数据库执行的结果

的公共功能DataModify(BYVAL str作为字符串)作为布尔数据库的 *** 作功能

昏暗的cmdinsert作为新的OleDbCommand

尝试

cmdinsert.CommandText = STR

是用来返回cmdinsert.Connection的= CN

如果cn.State = ConnectionState.Closed cn.Open()

DataBaseRST cmdinsert.ExecuteNonQuery()的执行结果 BR />cn.Close()

,则返回true

赶上前为异常

MessageBox.Show(Err.Description,“错误”,MessageBoxButtons.OK,MessageBoxIcon.Error)

返回False

尝试

端的功能

功能搜索(BYVAL作为字符串,BYVAL的DGV作为DataGridView的)作为布尔查询STR ---查询命令,DGV ---海峡和DataGridView控件来显示数据

昏暗的结核病新的DataTable

昏暗的AP尝试作为的新OleDb.OleDbDataAdapter(STR,CN)

ap.Fill(TB)

DGV作为数据源= TB

返回TRUE,“

抓住前异常

MessageBox.Show(Err.Description,”错误“,MessageBoxButtons.OK,MessageBoxIcon.Error)

则返回false />末尝试

功能

前端模块

以下是通话

DataModify(“插入AA值吗?('1 ','2')“)-------这里是数据库更新 *** 作。

搜索(”选择BB AA“DataGridView1的)-----------数据表的查询 *** 作。


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/sjk/9582813.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-29
下一篇 2023-04-29

发表评论

登录后才能评论

评论列表(0条)

保存