在VS2005提供的GridView中我们可以直接添加一个CommandField删除列:
那我们可以通过下面方法给GridView删除前加上一个确认对话框。
首先,在GridView的属性对框话框中点击“Columns”进入它的"字段"设计器;或者在设计窗口直接点击GridView控件右上角的那个小箭头,点击"编辑列",进入"字段"设计器。
接着在"字段"设计器中的左下方"选定的字段"框中,选择以前已加上的那个CommandField“删除”列,这时在右边它的属性列表下会看到一个"将此它段转换为 TemplateFied"的项,点击将它转换为TemplateFied列。
然后退出"字段"设计器,切换到源码视图你会发现该列已由原来的:
变为了:
CommandName="Delete" Text="删除">
最后在
这样点击删除时就会先在客户端弹出“您确认删除该记录吗?”对话框,点击"确定",则进行删除;点击"取消",则不删除.
而原来在onRowDeleting事件中写的代码完全不用改变。
这里有个例子,完整源码如下:
<%@ Page Language="VB" Debug ="true" %>
<%@ Import Namespace="System.Data.OleDb" %>
Dim connstr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("rizhi.mdb") & ";User Id=;Password=;"
Dim sql As String
Dim mycommand As OleDbCommand
Dim myread As OleDbDataReader
Dim conn As OleDbConnection
Sub page_load(ByVal sender As Object, ByVal e As EventArgs)
conn = New OleDbConnection(connstr)
conn.Open()
sql = "select * from rizhi"
mycommand = New OleDbCommand(sql, conn)
myread = mycommand.ExecuteReader()
GridView1.DataSource = myread
GridView1.DataBind()
conn.Close()
End Sub
Protected Sub GridView1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs)
End Sub
Protected Sub GridView1_RowDeleting(ByVal sender As Object, ByVal e As GridViewDeleteEventArgs)
Dim id As Integer = GridView1.DataKeys(e.RowIndex).Value
Dim j As Integer = 0
conn = New OleDbConnection(connstr)
conn.Open()
sql = "delete from rizhi where id=" & id
mycommand = New OleDbCommand(sql, conn)
Try
j = mycommand.ExecuteNonQuery
Response.Write("共删除了" & j & "条记录!")
sql = "select * from rizhi"
mycommand = New OleDbCommand(sql, conn)
myread = mycommand.ExecuteReader()
GridView1.DataSource = myread
GridView1.DataBind()
Catch ex As Exception
Throw ex
Finally
conn.Close()
End Try
End Sub

