Public Sub DataGrid1_Update(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Dim txtname, txturl As TextBox txtname = e.Item.Cells(1).Controls(0)
txturl = e.Item.Cells(2).Controls(0)
Dim sql As String
sql = "update sys_acl_object set object_name='" & txtname.Text & "',object_url='" & txturl.Text & "' where object_id='" & DataGrid1.DataKeys(CInt(e.Item.ItemIndex)) & "'"
Response.Write(sql)
Dim update1 As New GSXY.object.object1 update1.ExecuteSql(sql)
DataGrid1.EditItemIndex = -1
Call BindData()
End Sub
txturl = e.Item.Cells(2).Controls(0)
Dim sql As String
sql = "update sys_acl_object set object_name='" & txtname.Text & "',object_url='" & txturl.Text & "' where object_id='" & DataGrid1.DataKeys(CInt(e.Item.ItemIndex)) & "'"
Response.Write(sql)
Dim update1 As New GSXY.object.object1 update1.ExecuteSql(sql)
DataGrid1.EditItemIndex = -1
Call BindData()
End Sub
解决方案 »
- httpHandlers能重定向asp页面吗?
- 如何实现给树添加子类,修改,删除...
- 按关键词搜索结果排序问题,希望与关键词匹配最多的前面显示!!
- 如何加入指定页面编码的header?
- 问个超难问题!请思归、孟子、龎心等各位高手不吝赐教!(100分相送,问题解决再加100分)
- 怎么取得DataGrid上第2行第3列的值
- 高分求教:怎样向包括int, DateTime等非string参数的函数传递空值?
- 请问谁有论谈的源码呀?最好是基于C#2.0的。谢谢!
- 關于調用VB6.0的MSCOMM控件對象后移值工程的問題?100分可以再回200,在線等很急的,謝謝!
- 请问下面批量复制错在何处?
- 删除出现确认框
- MSMQ的问题
txtname = (TextBox)e.Item.Cells(1).Controls(1)
txturl = (TextBox)e.Item.Cells(2).Controls(1)
or use
txtname = (TextBox)e.Item.Cells(1).FindControl("TextBox1")
txturl = (TextBox)e.Item.Cells(2).FindControl("TextBox1")
先找到模板里面的控件再取值
txturl = Ctype(e.Item.Cells(2).Controls(0),TextBox)