请帮忙看一下DATAGRID 编辑一行后无法更新到数据库中

wangshixiang 2003-07-25 11:54:50
Sub DataGrid_Update(ByVal sender As Object, ByVal e As DataGridCommandEventArgs)
Dim SqlSelectCommand1 As SqlClient.SqlCommand
'Dim ds As DataSet
Dim updatecmd As String = "UPDATE KHWXDStable SET XingMing = @XingMing, BuMeng = @BuMeng, GuZhangXX = @GuZhangXX WHERE (KHDanNO = @Original_KHDanNO)"
'SqlSelectCommand1 = New SqlClient.SqlCommand("NewUpdateCommandkhwx", SqlConnection1)
SqlSelectCommand1 = New SqlClient.SqlCommand(updatecmd, SqlConnection1)
'SqlSelectCommand1.Parameters.Add(New SqlClient.SqlParameter("@XingMing", SqlDbType.Char, 20))
'SqlSelectCommand1.Parameters.Add(New SqlClient.SqlParameter("@BuMeng", SqlDbType.Char, 12))
'SqlSelectCommand1.Parameters.Add(New SqlClient.SqlParameter("@GuZhangXX", SqlDbType.VarChar, 50))
'SqlSelectCommand1.Parameters.Add(New SqlClient.SqlParameter("@Original_KHDanNO", SqlDbType.BigInt, 8))
'SqlSelectCommand1.Parameters("@Original_KHDanNO").Value = DataGrid1.DataKeys(CInt(e.Item.ItemIndex))

'Dim Cols As String() = {"@XingMing", "@BuMeng", "@GuZhangXX", "@Original_KHDanNO"}

'SqlSelectCommand1.CommandType = CommandType.StoredProcedure
SqlSelectCommand1.Parameters.Add("@Original_KHDanNO", DataGrid1.DataKeys(CInt(e.Item.ItemIndex)))
Dim Cols As String() = {"@XingMing", "@BuMeng", "@GuZhangXX"}
Dim NumCols As Integer = e.Item.Cells.Count
Dim i As Integer
Dim introw As Integer
'introw = e.Item.ItemIndex
For i = 1 To NumCols - 7
Dim CurrentTextBox As TextBox
CurrentTextBox = e.Item.Cells(i).Controls(0)
Dim ColValue As String = CurrentTextBox.Text
If i < 4 And ColValue = "" Then
MsgBox("错误:""姓名"" ""部门"" ""故障现象"" ""不允许为空""")

Return

End If
SqlSelectCommand1.Parameters.Add(Cols(i - 1), ColValue)
Next

SqlConnection1.Open()
SqlSelectCommand1.ExecuteNonQuery()
DataGrid1.EditItemIndex = -1
SqlConnection1.Close()
SqlSelectCommand1 = Nothing

BindGrid()
End Sub
...全文
29 回复 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

62,242

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术交流专区
javascript云原生 企业社区
社区管理员
  • ASP.NET
  • .Net开发者社区
  • R小R
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

.NET 社区是一个围绕开源 .NET 的开放、热情、创新、包容的技术社区。社区致力于为广大 .NET 爱好者提供一个良好的知识共享、协同互助的 .NET 技术交流环境。我们尊重不同意见,支持健康理性的辩论和互动,反对歧视和攻击。

希望和大家一起共同营造一个活跃、友好的社区氛围。

试试用AI创作助手写篇文章吧