為DataGrid添加CheckBox控制項

來源:互聯網
上載者:User
datagrid|控制項 為DataGrid添加CheckBox控制項,並實現“全選”功能。這裡是實現的例子

VB.NET 版本

CheckBoxDataGrid.aspx

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="CheckBoxDataGrid.aspx.vb"
Inherits="aspxWeb.CheckBoxDataGrid" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>為DataGrid添加CheckBox控制項的例子</title>
<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
<meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
<meta name="vs_defaultClientScript" content="JavaScript">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body MS_POSITIONING="GridLayout">
<form id="frmMain" method="post" runat="server">
<asp:DataGrid id="dgMain" runat="server" Width="98%" AutoGenerateColumns="False">
<SelectedItemStyle Font-Size="9pt" Font-Names="宋體"></SelectedItemStyle>
<EditItemStyle Font-Size="9pt" Font-Names="宋體" Font-Bold="True" ForeColor="Red" BackColor="Info"/>
<AlternatingItemStyle Font-Size="9pt" Font-Names="宋體" ForeColor="ControlText" BackColor="White"/>
<ItemStyle Font-Size="9pt" Font-Names="宋體" ForeColor="ControlText" BackColor="WhiteSmoke"/>
<HeaderStyle Font-Bold="True" HorizontalAlign="Center" ForeColor="Black"
VerticalAlign="Middle" BackColor="Control">
</HeaderStyle>
<Columns>
<asp:TemplateColumn HeaderText="操作">
<HeaderStyle HorizontalAlign="Center" Width="50px"></HeaderStyle>
<ItemTemplate>
<asp:CheckBox ID="chkExport" Runat="server" />
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="chkExportON" Runat="server" Enabled="true" />
</EditItemTemplate>
</asp:TemplateColumn>
<asp:BoundColumn DataField="id" ReadOnly="True" HeaderText="序號">
<HeaderStyle Width="50px"></HeaderStyle>
</asp:BoundColumn>
<asp:TemplateColumn SortExpression="demo" HeaderText="標題">
<ItemTemplate>
<asp:Label Text='<%# Server.HTMLEncode(DataBinder.Eval(Container.DataItem, "Title"))%>'
runat="server" Width="80%" ID="lblColumn"/>
</ItemTemplate>
</asp:TemplateColumn>
</Columns>
</asp:DataGrid>
<asp:Button id="cmdSelectAll" runat="server" Text="全部選中"></asp:Button>
<asp:Button id="cmdFindSelected" runat="server" Text="查看選中的項目"></asp:Button>
<br>
<asp:Label id="Label1" runat="server"></asp:Label>
</form>
</body>
</HTML>

後代碼 CheckBoxDataGrid.aspx.vb

Imports System.Data
Imports System.Data.OleDb

Public Class CheckBoxDataGrid
Inherits System.Web.UI.Page
Protected WithEvents cmdSelectAll As System.Web.UI.WebControls.Button
Protected WithEvents dgMain As System.Web.UI.WebControls.DataGrid
Protected WithEvents cmdFindSelected As System.Web.UI.WebControls.Button

Dim oDataView As DataView
Protected WithEvents Label1 As System.Web.UI.WebControls.Label
Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="_
+ Server.MapPath("Test.mdb")


#Region " Web Form Designer Generated Code "

'This call is required by the Web Form Designer.
<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: This method call is required by the Web Form Designer
'Do not modify it using the code editor.
InitializeComponent()
End Sub

#End Region

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)_
Handles MyBase.Load
'Put user code to initialize the page here
dgMain.Columns(0).HeaderText = "選項"
dgMain.Columns(1).HeaderText = "序號"
dgMain.Columns(2).HeaderText = "標題"
cmdFindSelected.Text = "查看選中的項目"
RefreshGrid()
If Not Page.IsPostBack Then
cmdSelectAll.Text = "全部選中"
dgMain.DataBind()
End If

End Sub


#Region "處理多選"
Private Sub cmdSelectAll_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)_
Handles cmdSelectAll.Click
selectAll()
End Sub

Private Sub selectAll()
Dim oDataGridItem As DataGridItem
Dim chkExport As System.Web.UI.WebControls.CheckBox

If cmdSelectAll.Text = "全部選中" Then
For Each oDataGridItem In dgMain.Items
chkExport = oDataGridItem.FindControl("chkExport")
chkExport.Checked = True
Next
cmdSelectAll.Text = "全部不選"
Else
For Each oDataGridItem In dgMain.Items
chkExport = oDataGridItem.FindControl("chkExport")
chkExport.Checked = False
Next
cmdSelectAll.Text = "全部選中"
End If
End Sub
#End Region

#Region "更新DataGrid"

Private Sub RefreshGrid()
Dim oConnection As OleDbConnection
Dim oCommand As OleDbDataAdapter
Dim oDataSet As New DataSet()

Try
Dim sSQL As String = "Select top 5 * from TestTable order by id"
oConnection = New OleDbConnection(sConnectionString)
oCommand = New OleDbDataAdapter(sSQL.ToString, oConnection)
oCommand.Fill(oDataSet, "TestTable")
oDataView = New DataView(oDataSet.Tables("TestTable"))
dgMain.DataSource = oDataView
oConnection.Close()

Catch ex As Exception
'// Place Error Handling here
End Try
End Sub
#End Region

Private Sub cmdFindSelected_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)_
Handles cmdFindSelected.Click
Dim oDataGridItem As DataGridItem
Dim chkExport As System.Web.UI.WebControls.CheckBox
Dim oExArgs As New System.Collections.ArrayList()
Dim sID As String
Label1.Text = ""
For Each oDataGridItem In dgMain.Items
chkExport = oDataGridItem.FindControl("chkExport")
If chkExport.Checked Then
Label1.Text = ""
sID = CType(oDataGridItem.FindControl("lblColumn"), Label).Text
oExArgs.Add(sID)
Dim i As Integer = 0
For i = 0 To oExArgs.Count - 1
Label1.Text += oExArgs(i) + ","
Next
End If
Next
End Sub

End Class

C# 版本

CheckBoxDataGrid.aspx

<%@ Page language="c#" enableViewState = "true" Codebehind="DataGridCheckBox.aspx.cs"
AutoEventWireup="false" Inherits="eMeng.Exam.DataGridCheckBox.DataGridCheckBox" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>為DataGrid添加CheckBox控制項的例子</title>
</HEAD>
<body>
<form id="frmMain" method="post" runat="server">
<asp:DataGrid id="dgMain" runat="server" Width="98%" AutoGenerateColumns="False" Font-Size="9pt" Font-Names="宋體">
<AlternatingItemStyle ForeColor="ControlText" BackColor="White" />
<ItemStyle ForeColor="ControlText" BackColor="WhiteSmoke" />
<HeaderStyle Font-Bold="True" HorizontalAlign="Center" ForeColor="Black" VerticalAlign="Middle"
BackColor="Control"></HeaderStyle>
<Columns>
<asp:TemplateColumn HeaderText="操作">
<HeaderStyle HorizontalAlign="Center" Width="50px"></HeaderStyle>
<ItemTemplate>
<input type="hidden" id="SelectedID" runat="server"
value='<%# DataBinder.Eval(Container.DataItem, "id")%>'/>
<asp:CheckBox ID="chkExport" Runat="server" />
</ItemTemplate>
</asp:TemplateColumn>
<asp:BoundColumn DataField="id" ReadOnly="True" HeaderText="序號">
<HeaderStyle Width="50px"></HeaderStyle>
</asp:BoundColumn>
<asp:TemplateColumn SortExpression="demo" HeaderText="標題">
<ItemTemplate>
<asp:Label Text='<%# Server.HtmlEncode((string)DataBinder.Eval(Container.DataItem, "Title"))%>'
runat="server" Width="80%" ID="lblColumn" />
</ItemTemplate>
</asp:TemplateColumn>
</Columns>
</asp:DataGrid>
<asp:Button id="cmdSelectAll" runat="server" Text="全部選中"></asp:Button>
<asp:Button id="cmdFindSelected" runat="server" Text="查看選中的項目"></asp:Button>
<br>
<asp:Label id="Label1" runat="server"></asp:Label>
<hr>
<asp:Label id="Label2" runat="server"></asp:Label>
</form>
</body>
</HTML>

DataGridCheckBox.aspx.cs

using System;
using System.Collections;
using System.ComponentModel;
using System.Data;
using System.Data.OleDb;
using System.Drawing;
using System.Web;
using System.Web.SessionState;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.HtmlControls;

namespace eMeng.Exam.DataGridCheckBox
{
/// <summary>
/// DataGridCheckBox 的摘要說明。
/// 【孟憲會之精彩世界】
/// </summary>
public class DataGridCheckBox : System.Web.UI.Page
{
protected System.Web.UI.WebControls.Button cmdSelectAll;
protected System.Web.UI.WebControls.Button cmdFindSelected;
protected System.Web.UI.WebControls.DataGrid dgMain;
protected System.Web.UI.WebControls.Label Label1;
protected System.Web.UI.WebControls.Label Label2;
DataView oDataView;
string sConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
+ HttpContext.Current.Server.MapPath("../../aspxWeb.mdb.ascx");

private void Page_Load(object sender, System.EventArgs e)
{
// 在此處放置使用者代碼以初始化頁面
dgMain.Columns[0].HeaderText = "選項";
dgMain.Columns[1].HeaderText = "序號";
dgMain.Columns[2].HeaderText = "標題";
cmdFindSelected.Text = "查看選中的項目";
RefreshGrid();
if( !this.IsPostBack)
{
cmdSelectAll.Text = "全部選中";
dgMain.DataBind();
}
}
#region Web Form Designer generated code
override protected void OnInit(EventArgs e)
{
//
// CODEGEN:該調用是 ASP.NET Web Form設計器所必需的。
//
InitializeComponent();
base.OnInit(e);
}

/// <summary>
/// 設計器支援所需的方法 - 不要使用代碼編輯器修改
/// 此方法的內容。
/// </summary>
private void InitializeComponent()
{
this.cmdSelectAll.Click += new System.EventHandler(this.cmdSelectAll_Click);
this.cmdFindSelected.Click += new System.EventHandler(this.cmdFindSelected_Click);
this.Load += new System.EventHandler(this.Page_Load);

}
#endregion

private void cmdSelectAll_Click(object sender, System.EventArgs e)
{
selectAll();
}

private void selectAll()
{
System.Web.UI.WebControls.CheckBox chkExport ;
if( cmdSelectAll.Text == "全部選中")
{
foreach(DataGridItem oDataGridItem in dgMain.Items)
{
chkExport = (CheckBox)oDataGridItem.FindControl("chkExport");
chkExport.Checked = true;
}
cmdSelectAll.Text = "全部不選";
}
else
{
foreach(DataGridItem oDataGridItem in dgMain.Items)
{
chkExport = (CheckBox)oDataGridItem.FindControl("chkExport");
chkExport.Checked = false;
}
cmdSelectAll.Text = "全部選中";
}
}

private void RefreshGrid()
{
OleDbConnection oConnection;
OleDbDataAdapter oCommand ;
DataSet oDataSet = new DataSet();
try
{
string sSQL = "Select top 10 * from Document order by CreateDate DESC";
oConnection = new OleDbConnection(sConnectionString);
oCommand = new OleDbDataAdapter(sSQL.ToString(), oConnection);
oCommand.Fill(oDataSet, "Document");
oDataView = new DataView(oDataSet.Tables["Document"]);
dgMain.DataSource = oDataView;
oConnection.Close();
}
catch(Exception ex)
{
Label1.Text = ex.Message.ToString();
}
}

private void cmdFindSelected_Click(object sender, System.EventArgs e)
{
System.Web.UI.WebControls.CheckBox chkExport;
System.Collections.ArrayList oExArgs = new System.Collections.ArrayList();
string sID;
Label1.Text = "";
Label2.Text = "";
foreach(DataGridItem oDataGridItem in dgMain.Items)
{
chkExport = (CheckBox)oDataGridItem.FindControl("chkExport");
if( chkExport.Checked)
{
//如果要進行刪除,可以在這裡構造sql語句進行刪除
string sql = "DELETE FROM Document WHERE id ="
+ ((HtmlInputHidden)oDataGridItem.FindControl("SelectedID")).Value;
Label2.Text += "<li>" + sql;
sID = ((HtmlInputHidden)oDataGridItem.FindControl("SelectedID")).Value;
oExArgs.Add(sID);
int i = 0;
Label1.Text = "";
for( i = 0;i<oExArgs.Count;i++)
{
Label1.Text += oExArgs[i] + "<br>";
}
}
}
Label2.Text += "<br><font color=red>執行SQL語句即可刪除,這裡省略。</font>";
}
}
}



相關文章

E-Commerce Solutions

Leverage the same tools powering the Alibaba Ecosystem

Learn more >

11.11 Big Sale for Cloud

Get Unbeatable Offers with up to 90% Off,Oct.24-Nov.13 (UTC+8)

Get It Now >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。