以文本方式查看主题

-  中文XML论坛 - 专业的XML技术讨论区  (http://bbs.xml.org.cn/index.asp)
--  『 Dot NET,C#,ASP,VB 』  (http://bbs.xml.org.cn/list.asp?boardid=43)
----  Re: 怎么给ASP.net中的DataGrid添加删除确认对话框?  (http://bbs.xml.org.cn/dispbbs.asp?boardid=43&rootid=&id=11828)


--  作者:admin
--  发布时间:11/9/2004 2:26:00 AM

--  Re: 怎么给ASP.net中的DataGrid添加删除确认对话框?


发信人: NoblePaul (小牛哥), 信区: DotNET
标  题: Re: 怎么给ASP.net中的DataGrid添加删除确认对话框?
发信站: BBS 水木清华站 (Sat Mar 27 07:16:30 2004), 转信

在 DataGrid_Query_ItemDataBound 里添加以下代码
Confirm(e)

----
Confirm(ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs)的代码:

    REM 添加编辑、删除确认功能
    Public Shared Sub Confirm(ByVal e As System.Web.UI.WebControls.DataGridI
temEventArgs)
        Try
            Select Case e.Item.ItemType
                Case System.Web.UI.WebControls.ListItemType.Item, System.Web
.UI.WebControls.ListItemType.AlternatingItem, System.Web.UI.WebControls.List
ItemType.EditItem, System.Web.UI.WebControls.ListItemType.SelectedItem
                    Dim LTableCell As System.Web.UI.WebControls.TableCell
                    Dim LLoopNum As Integer
                    For LLoopNum = 0 To e.Item.Cells.Count - 1
                        LTableCell = e.Item.Cells(LLoopNum)
                        Dim LButton As System.Web.UI.WebControls.Button
                        If LTableCell.Controls.Count > 0 Then
                            If LTableCell.Controls(0).GetType.ToString.ToLow
er = "system.web.ui.webcontrols.button" Then
                                LButton = LTableCell.Controls(0)
                                LButton.Attributes.Add("onclick", "return co
nfirm('您确定要" + LButton.Text.Replace(" ", "") + "该条记录?');")
                                'LButton.Attributes.Add("class", "btn")
                                'LButton.Attributes.Add("onmouseover", "this
.className='btn_over';")
                                'LButton.Attributes.Add("onmouseout", "this.
className='btn';")
                            End If
                        End If
                    Next
            End Select
        Catch ex As Exception
            Log.exNoteBugs(ex, "zehua.DataGrid.Confirm|Public Shared Sub Con
firm")
        End Try
    End Sub


--------------------------------------------------------------------------
【 在 bemywife (杀人不见血) 的大作中提到: 】
∶我给DataGrid增加了一列,上面有默认的“删除”按钮
∶单击这个按钮,就会删除相应行的记录。
∶现在,我希望在删除之前能出现一个确认对话框,这应该怎么做?
∶...................

--

※ 来源:·BBS 水木清华站 smth.org·[FROM: 203.93.38.*]
上一篇
返回上一页
回到目录
回到页首



W 3 C h i n a ( since 2003 ) 旗 下 站 点
苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》
78.125ms