[VB.NET]datagrid的记录已删除,怎么更新到数据库???
来源:互联网 发布:日本推理小说作家 知乎 编辑:程序博客网 时间:2024/04/29 06:20
datagrid的记录已删除,怎么更新到数据库???
Dim row As DataSet1.管理用户Row
row = DataSet11.管理用户(DataGrid1.CurrentRowIndex) 选中行
DataSet11.管理用户.Remove管理用户Row(row) 删除行
SqlDataAdapter1.Update(DataSet11)
这样只能将Datagrid里的选定记录删除,不能更新到数据库
__________________________________________________________________________
死了算了
__________________________________________________________________________
在SqlDataAdapter1.Fill(DataSet11)这一句前加上
Dim b As SqlCommandBuilder = New SqlCommandBuilder(SqlDataAdapter1)
这一句用来生成相应的SQL语句,没有的话就不能对数据产生作用了。
lz先试试。千万别灰心啊,打起精神来!
__________________________________________________________________________
我改了代码,不过还是不起作用....
Dim row As DataSet1.管理用户Row
row = DataSet11.管理用户(DataGrid1.CurrentRowIndex) 选中行
DataSet11.管理用户.Remove管理用户Row(row) 删除行
Dim db As SqlCommandBuilder = New SqlCommandBuilder(SqlDataAdapter1)
SqlDataAdapter1.Update(DataSet11, 管理用户 )
DataSet11.AcceptChanges()
__________________________________________________________________________
Dim bm As BindingManagerBase
Private Sub Form10_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
dapsw.Fill(DataSet21)
DataGrid1.SetDataBinding(DataSet21, psw )
bm = Me.BindingContext(DataSet21, psw )
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dgrDelete = DialogResult
Try
dgrDelete = MessageBox.Show( 是否要删除记录? , 提示 , MessageBoxButtons.YesNo)
If dgrDelete = DialogResult.Yes Then
With bm
.RemoveAt(.Position)
End With
MessageBox.Show( 删除成功 , 提示 )
dapsw.Update(DataSet21)
DataSet21.AcceptChanges()
End If
Catch err As Exception
MessageBox.Show(err.Message)
End Try
End sub
我的给你参考下
__________________________________________________________________________
正在看,谢谢
__________________________________________________________________________
删除成功,正在分析.非常感谢你
能解释一下这段是什么意思么??
With bm
.RemoveAt(.Position)
End With
__________________________________________________________________________
是不是用来绑定原DATASET里的字段的?
__________________________________________________________________________
帮顶管理器中的RemoveAt方法,目的是删除表中的当前行
__________________________________________________________________________
解决了话,界贴给分了,哈哈
__________________________________________________________________________
怎么给?
__________________________________________________________________________
点管理,照着做就好了
__________________________________________________________________________
给分也要回复....
__________________________________________________________________________
你照着做就行了,在给分的名字旁打勾
__________________________________________________________________________
Dim row As DataSet1.管理用户Row
row = DataSet11.管理用户(DataGrid1.CurrentRowIndex) 选中行
DataSet11.管理用户.Remove管理用户Row(row) 删除行
SqlDataAdapter1.Update(DataSet11)
这样只能将Datagrid里的选定记录删除,不能更新到数据库
__________________________________________________________________________
死了算了
__________________________________________________________________________
在SqlDataAdapter1.Fill(DataSet11)这一句前加上
Dim b As SqlCommandBuilder = New SqlCommandBuilder(SqlDataAdapter1)
这一句用来生成相应的SQL语句,没有的话就不能对数据产生作用了。
lz先试试。千万别灰心啊,打起精神来!
__________________________________________________________________________
我改了代码,不过还是不起作用....
Dim row As DataSet1.管理用户Row
row = DataSet11.管理用户(DataGrid1.CurrentRowIndex) 选中行
DataSet11.管理用户.Remove管理用户Row(row) 删除行
Dim db As SqlCommandBuilder = New SqlCommandBuilder(SqlDataAdapter1)
SqlDataAdapter1.Update(DataSet11, 管理用户 )
DataSet11.AcceptChanges()
__________________________________________________________________________
Dim bm As BindingManagerBase
Private Sub Form10_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
dapsw.Fill(DataSet21)
DataGrid1.SetDataBinding(DataSet21, psw )
bm = Me.BindingContext(DataSet21, psw )
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dgrDelete = DialogResult
Try
dgrDelete = MessageBox.Show( 是否要删除记录? , 提示 , MessageBoxButtons.YesNo)
If dgrDelete = DialogResult.Yes Then
With bm
.RemoveAt(.Position)
End With
MessageBox.Show( 删除成功 , 提示 )
dapsw.Update(DataSet21)
DataSet21.AcceptChanges()
End If
Catch err As Exception
MessageBox.Show(err.Message)
End Try
End sub
我的给你参考下
__________________________________________________________________________
正在看,谢谢
__________________________________________________________________________
删除成功,正在分析.非常感谢你
能解释一下这段是什么意思么??
With bm
.RemoveAt(.Position)
End With
__________________________________________________________________________
是不是用来绑定原DATASET里的字段的?
__________________________________________________________________________
帮顶管理器中的RemoveAt方法,目的是删除表中的当前行
__________________________________________________________________________
解决了话,界贴给分了,哈哈
__________________________________________________________________________
怎么给?
__________________________________________________________________________
点管理,照着做就好了
__________________________________________________________________________
给分也要回复....
__________________________________________________________________________
你照着做就行了,在给分的名字旁打勾
__________________________________________________________________________
- [VB.NET]datagrid的记录已删除,怎么更新到数据库???
- vb.net 一个Datagrid的记录添加到另一个Datagrid中
- [VB.NET]怎么删除Dataset里的被Datagrid指定的行
- VB.NET将数据库的记录导出到excel中
- [VB.NET]怎么没有更新access数据库啊
- VB.NET的DataGrid控件中显示数据记录编号
- [VB.NET]如何删除datagrid选中的行
- [VB.NET]在VB.net中将数据库中得到的1个值记录到一个变量中
- [VB.NET]怎样将datagrid的数据导出到datadset
- VB.net数据库编程中DataGrid控件的使用技巧
- [VB.NET]vb.net中怎样删除Datagrid中的数据
- [VB.NET]DataGrid数据取到Textbox
- vb.net批量查询已删除域名
- vb.net 删除数据库内容
- [VB.NET]请教!!!!关于删除记录的问题......
- vb.net向acces数据库添加记录,怎么用代码实现?
- Datagrid怎么根据选择的checkbox编辑和更新多行记录
- Datagrid怎么根据选择的checkbox编辑和更新多行记录
- acegi登出处理
- [VB.NET]请问我如何在vb.net中调用pl/sql包中已经写好的方法?
- [VB.NET]怎么删除Dataset里的被Datagrid指定的行
- 后缀树线性构造算法
- C++程序序员注意点
- [VB.NET]datagrid的记录已删除,怎么更新到数据库???
- Acegi保护对方法的呼叫
- [VB.NET]请教MSScript.ocx 问题
- 解读acegi的配置文件
- [VB.NET]这段代码错在哪?关于soundplayer类的
- [VB.NET]在VB.net中将数据库中得到的1个值记录到一个变量中
- 第一个Acegi程式
- [VB.NET]求救,treeview做的导航条代码(VB)
- 在Spring中配置log4j