为DataGrid添加确认删除的对话框(3)

转载 2006年06月15日 14:51:00

DeleteIt3.aspx

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="DeteleIt3.aspx.vb" Inherits="aspxWeb.DeteleIt3"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
  <HEAD>
    <title>DeteleIt3</title>
    <meta content="Microsoft Visual Studio .NET 7.0" name="GENERATOR">
    <meta content="Visual Basic 7.0" name="CODE_LANGUAGE">
    <meta content="JavaScript" name="vs_defaultClientScript">
    <meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
  </HEAD>
  <body MS_POSITIONING="GridLayout">
    <asp:label id="Label1" runat="Server"></asp:label>
    <form id="Form1" runat="server">
      <asp:datagrid id="myDataGrid" runat="server" AutoGenerateColumns="True" DataKeyField="Title">
        <Columns>
          <asp:ButtonColumn CommandName="Delete" ButtonType="PushButton" />
        </Columns>
      </asp:datagrid>
    </form>
  </body>
</HTML>

后代码DeteleIt3.aspx.vb

Imports System.Web
Imports System.Data
Imports System.Data.OleDb

Public Class DeteleIt3
  Inherits System.Web.UI.Page
  Protected WithEvents Label1 As System.Web.UI.WebControls.Label
  Protected WithEvents myDataGrid As System.Web.UI.WebControls.DataGrid

#Region " Web 窗体设计器生成的代码 "

  '该调用是 Web 窗体设计器所必需的。
  <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

  End Sub

  Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
    'CODEGEN: 此方法调用是 Web 窗体设计器所必需的
    '不要使用代码编辑器修改它。
    InitializeComponent()
  End Sub

#End Region

  Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
    '在此处放置初始化页的用户代码
    If Not IsPostBack Then
      Dim strCn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("Test.mdb")
      Dim strSql As String = "SELECT Top 15 Title,CreateDate FROM Document Order By CreateDate Desc"
      Dim cn As New OleDbConnection(strCn)
      cn.Open()
      Dim cmd As New OleDbCommand(strSql, cn)
      myDataGrid.DataSource = cmd.ExecuteReader(CommandBehavior.CloseConnection)
      myDataGrid.DataBind()
      cmd.Dispose()
      cmd = Nothing
      cn.Close()
      cn.Dispose()
      cn = Nothing
    End If
    Page.RegisterOnSubmitStatement("OnSubmit", "{return confirm('您真的要删除此行吗??') } ")
  End Sub

  Sub myDataGrid_ItemCreated(ByVal sender As Object, _
   ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles myDataGrid.ItemCreated
    Select Case e.Item.ItemType
      Case ListItemType.Item, ListItemType.AlternatingItem, ListItemType.EditItem
        Dim myTableCell As TableCell
        myTableCell = e.Item.Cells(0)
        Dim myDeleteButton As Button
        myDeleteButton = myTableCell.Controls(0)
        myDeleteButton.Text = "删除此行"
      Case ListItemType.Header
        e.Item.Font.Bold = True
        e.Item.HorizontalAlign = HorizontalAlign.Center
        e.Item.BackColor = System.Drawing.Color.Ivory
        e.Item.Cells(0).Text = "操作"
        e.Item.Cells(1).Text = "文章标题"
        e.Item.Cells(2).Text = "发布日期"
    End Select
  End Sub

  Private Sub myDataGrid_DeleteCommand(ByVal source As Object, _
   ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles myDataGrid.DeleteCommand
    Label1.Text = "您删除的是:<font color=red>" + myDataGrid.DataKeys(CInt(e.Item.ItemIndex)) + "</font>"
    e.Item.BackColor = System.Drawing.Color.Tomato
  End Sub

End Class

 

在DataGrid里添加确认删除的对话框

在DataGrid里添加确认删除的对话框http://lucky_elove.www1.dotnetplayground.com/在删除数据前进行确认是一个非常友好的做法。在本文里,我们就讨论利用...
  • hejishan
  • hejishan
  • 2008年03月11日 12:15
  • 192

WPF 删除DataGrid 行 弹出确认对话框

/弹出确认删除提示对话框?                          MessageBoxResult confirmToDel = MessageBox.Show("确认要删除所选行吗?"...
  • software_kid
  • software_kid
  • 2013年07月17日 21:43
  • 3725

为DataGrid添加确认删除的对话框

为DataGrid添加确认删除的对话框(1)  在删除数据前进行确认是一个非常友好的做法。在本文里,我们就讨论利用TemplateColumn和Button服务端控件实现这种功能的方法。 Delete...
  • colayungnew
  • colayungnew
  • 2004年10月14日 15:55
  • 596

为DataGrid添加确认删除的对话框(3)

在DataGrid里添加确认删除的对话框,第三个办法就是利用Page对象的RegisterOnSubmitStatement方法。Page.RegisterOnSubmitStatement方法能够使...
  • luoboqingcai
  • luoboqingcai
  • 2004年09月25日 18:28
  • 601

DataGrid 添加点击删除确认对话框

DataGrid点击删除按钮弹出确认对话框一个好办法 原文地址http://expert.csdn.net/Expert/topic/2852/2852126.xml?temp=.4770471 其中...
  • qiuzhong1983
  • qiuzhong1983
  • 2006年06月05日 13:47
  • 831

为DataGrid添加确认删除的对话框(1)

在删除数据前进行确认是一个非常友好的做法。在本文里,我们就讨论利用TemplateColumn和Button服务端控件实现这种功能的方法。DeleteIt.aspx WebForm1 ...
  • luoboqingcai
  • luoboqingcai
  • 2004年09月25日 18:29
  • 568

win10去掉删除确认对话框

相信用过win8的同学都知道,win8默认删除不弹出提示框,刚开始使用win8的时候奇怪怎么没有提示框,后来慢慢习惯了,感觉挺方便的。但现在用win10发现又有提示框了,删除文件多了感觉很麻烦(人变懒...
  • student9128
  • student9128
  • 2016年07月14日 19:44
  • 2139

为DataGrid添加删除确认的功能

DataGrid的Html页的内容如下:asp:DataGrid id="dgTest" runat="server">    Columns>     asp:TemplateColumn>    ...
  • sakurain
  • sakurain
  • 2006年11月06日 22:42
  • 529

为DataGrid添加确认删除的对话框(2)

在DataGrid里添加确认删除的对话框,第二个办法就是利用ButtonColumn,这个办法与第一个方法不同的是:我们不能使用FindControl方法来引用Button控件,这是因为,我们不知道由...
  • luoboqingcai
  • luoboqingcai
  • 2004年09月25日 18:29
  • 603

jquery弹窗,确定,删除对话框

点击这里下载jquery-ui-1.8.16.custom.zip,可以在官网的UI中找到他。将development-bundle文件夹中的external,themes,ui复制到你的工程中 引...
  • LMAOhuaNL
  • LMAOhuaNL
  • 2011年08月26日 00:27
  • 15441
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:为DataGrid添加确认删除的对话框(3)
举报原因:
原因补充:

(最多只允许输入30个字)