在vb.net 中.........我用下面的代码想把在dataGridView 上直接更新的代码保存在数据库中
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim sSelectCmd As String
Dim Fdt As DataSet = New DataSet
Dim sMemberID As String, sFrom As String
Dim sParentID As Integer
Dim sobject As String, sTableAlias As String sMemberID = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(0).Value.ToString
sFrom = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(1).Value.ToString
sParentID = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(2).Value.ToString sobject = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(3).Value.ToString
sTableAlias = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(4).Value.ToString
Dim adapter As New SqlDataAdapter()
sSelectCmd = "Update dicFormObjectCond set TableAlias = '" & sTableAlias & "' ,ObjectID ='" & sobject & "' "
sSelectCmd = sSelectCmd & " where MemberID = '" & sMemberID & "' and "
sSelectCmd = sSelectCmd & " FormID = '" & sFrom & "' and ParentID = '" & sParentID & "' " DBopen() adapter.SelectCommand = New SqlCommand(sSelectCmd, Conn) Dim builder As SqlCommandBuilder = New SqlCommandBuilder(adapter) adapter.Fill(Fdt) builder.GetUpdateCommand()标 '''到这里为什么就出错了.....
adapter.Update(Fdt)
End Sub还有我这样写能不能把我在DataGridView上直接修改的数据保存到数据库中去....
望指教
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim sSelectCmd As String
Dim Fdt As DataSet = New DataSet
Dim sMemberID As String, sFrom As String
Dim sParentID As Integer
Dim sobject As String, sTableAlias As String sMemberID = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(0).Value.ToString
sFrom = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(1).Value.ToString
sParentID = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(2).Value.ToString sobject = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(3).Value.ToString
sTableAlias = DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(4).Value.ToString
Dim adapter As New SqlDataAdapter()
sSelectCmd = "Update dicFormObjectCond set TableAlias = '" & sTableAlias & "' ,ObjectID ='" & sobject & "' "
sSelectCmd = sSelectCmd & " where MemberID = '" & sMemberID & "' and "
sSelectCmd = sSelectCmd & " FormID = '" & sFrom & "' and ParentID = '" & sParentID & "' " DBopen() adapter.SelectCommand = New SqlCommand(sSelectCmd, Conn) Dim builder As SqlCommandBuilder = New SqlCommandBuilder(adapter) adapter.Fill(Fdt) builder.GetUpdateCommand()标 '''到这里为什么就出错了.....
adapter.Update(Fdt)
End Sub还有我这样写能不能把我在DataGridView上直接修改的数据保存到数据库中去....
望指教
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货