Sunday 13 January 2013

According Check Box On Grid View Delete The record Or change the Row color….




According Check Box On Grid View Delete The record Or change the Row color….



<%@PageLanguage="VB"AutoEventWireup="false"CodeFile="DeleteMultipleRecordFromGridandTransfertoanotherGrid.aspx.vb"Inherits="DeleteMultipleRecordFromGridandTransfertoanotherGrid"%>

<!DOCTYPEhtmlPUBLIC"-//W3C//DTD XHTML 1.0 Transitional//EN""http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<htmlxmlns="http://www.w3.org/1999/xhtml">
<headrunat="server">
<title>Untitled Page</title>
<scripttype="text/javascript">
functionCheck_Click(obj)
{
var row = obj.parentNode.parentNode;
if(obj.checked)
            {
row.style.backgroundColor = "aqua";
            }
else
            {   
if(row.rowIndex % 2 == 0)
                {
//Alternating Row Color
row.style.backgroundColor = "#C2D69B";
                }
else
                {
row.style.backgroundColor = "white";
                }
            }
varGridView = row.parentNode;
varinputList = GridView.getElementsByTagName("input");

for (var i=0;i<inputList.length;i++)
            {
var cell = inputList[i].parentNode;
varheaderCheckBox = inputList[0];
var checked = true;
if(inputList[i].type == "checkbox"&&inputList[i] != headerCheckBox)
                {
if(!inputList[i].checked)
                    {
checked = false;
break;
                    }
                }
            }
headerCheckBox.checked = checked;

        }
</script>
<scripttype="text/javascript">
functioncheckAll(objRef)
        {
varGridView = objRef.parentNode.parentNode.parentNode;
varinputList = GridView.getElementsByTagName("input");
for (var i=0;i<inputList.length;i++)
            {
//Get the Cell To find out ColumnIndex
var cell = inputList[i].parentNode;
var row = inputList[i].parentNode.parentNode;
if(inputList[i].type == "checkbox"&&cell.cellIndex == 0 &&objRef != inputList[i])
                {
if (objRef.checked)
                    {
row.style.backgroundColor = "aqua";
inputList[i].checked=true;
                    }
else
                    {
if(row.rowIndex % 2 == 0)
                        {
//Alternating Row Color
row.style.backgroundColor = "#C2D69B";
                        }
else
                        {
row.style.backgroundColor = "white";
                        }
inputList[i].checked=false;
                    }
                }
            }
        }
</script>
<scripttype="text/javascript">
functionMouseEvents(objRef, evt)
{
var checkbox = objRef.getElementsByTagName("input")[0];
if (evt.type == "mouseover")
   {
objRef.style.backgroundColor = "orange";
   }
else
   {
if (checkbox.checked)
        {
objRef.style.backgroundColor = "pink";
        }
elseif(evt.type == "mouseout")
        {
if(objRef.rowIndex % 2 == 0)
            {
//Alternating Row Color
objRef.style.backgroundColor = "#C2D69B";
            }
else
            {
objRef.style.backgroundColor = "white";
            }
        }
   }
}
</script>

</head>
<body>

<formid="form1"runat="server">
<div>
<table>
<tr>
<td>
<asp:LabelID="Label3"runat="server"Text="Check all Using Javascipt"BackColor="#C0FFC0"Font-Bold="True"Width="355px"></asp:Label>
<asp:GridViewID="GridView1"runat="server"BackColor="White"OnRowDataBound="GridView1_RowDataBound"AutoGenerateColumns="false"BorderColor="#3366CC"BorderStyle="None"BorderWidth="1px"CellPadding="4"Width="89px">
<RowStyleBackColor="White"ForeColor="#003399"/>
<FooterStyleBackColor="#99CCCC"ForeColor="#003399"/>
<PagerStyleBackColor="#99CCCC"ForeColor="#003399"HorizontalAlign="Left"/>
<SelectedRowStyleBackColor="#009999"Font-Bold="True"ForeColor="#CCFF99"/>
<HeaderStyleBackColor="#003399"Font-Bold="True"ForeColor="#CCCCFF"/>
<Columns>
<asp:TemplateFieldHeaderText="Select">
<HeaderTemplate>
<asp:CheckBoxID="chkAll"runat="server"onclick="checkAll(this);"/>
</HeaderTemplate>
<ItemTemplate>
<asp:CheckBoxID="chkBox1"runat="server"onclick="Check_Click(this)">
</asp:CheckBox>
<asp:LabelID="lblId"runat="server"Text='<%#Eval("ID") %>'Visible="false"></asp:Label>

</ItemTemplate>
</asp:TemplateField>
<asp:TemplateFieldHeaderText="Si.NO">
<ItemTemplate>
<%#Container.DataItemIndex+1 %>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundFieldDataField="Firstname"HeaderText="Firstname"/>
<asp:BoundFieldDataField="Middlename"HeaderText="Middlename"/>
<asp:BoundFieldDataField="Lastname"HeaderText="Lastname"/>

</Columns>

</asp:GridView>
</td>


<tdstyle="width: 3px">
<asp:LabelID="Label2"runat="server"Text="Check all Using Without Javascipt"BackColor="#C0FFC0"Font-Bold="True"Width="348px"></asp:Label>
<asp:GridViewID="GridView3"runat="server"BackColor="White"OnRowDataBound="GridView3_RowDataBound"AutoGenerateColumns="false"BorderColor="#3366CC"BorderStyle="None"BorderWidth="1px"CellPadding="4"Width="89px">
<RowStyleBackColor="White"ForeColor="#003399"/>
<FooterStyleBackColor="#99CCCC"ForeColor="#003399"/>
<PagerStyleBackColor="#99CCCC"ForeColor="#003399"HorizontalAlign="Left"/>
<SelectedRowStyleBackColor="#009999"Font-Bold="True"ForeColor="#CCFF99"/>
<HeaderStyleBackColor="#003399"Font-Bold="True"ForeColor="#CCCCFF"/>
<Columns>
<asp:TemplateFieldHeaderText="Select">
<HeaderTemplate>
<asp:CheckBoxID="chkAll"runat="server"AutoPostBack="true"OnCheckedChanged="chkSelectAll_CheckedChanged"/>
</HeaderTemplate>
<ItemTemplate>
<asp:CheckBoxID="chkBox1"runat="server"AutoPostBack="true"OnCheckedChanged="chkSelectAll_CheckedChanged1">
</asp:CheckBox>
<asp:LabelID="lblId"runat="server"Text='<%#Eval("ID") %>'Visible="false"></asp:Label>

</ItemTemplate>
</asp:TemplateField>
<asp:TemplateFieldHeaderText="Si.NO">
<ItemTemplate>
<%#Container.DataItemIndex+1 %>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundFieldDataField="Firstname"HeaderText="Firstname"/>
<asp:BoundFieldDataField="Middlename"HeaderText="Middlename"/>
<asp:BoundFieldDataField="Lastname"HeaderText="Lastname"/>

</Columns>

</asp:GridView>

</td>
</tr>
</table>

<asp:LabelID="Label1"runat="server"Text="Label"></asp:Label>
<asp:ButtonID="BtnDelete"CausesValidation="false"OnClick="BtnDelete_Click"OnClientClick="return confirm('Are you sure?')"runat="server"Text="Delete"/>
<asp:ButtonID="Button1"runat="server"OnClick="Button1_Click"Text="Extract Record"/>
<asp:GridViewID="GridView2"runat="server"CellPadding="4"AutoGenerateColumns="false"ForeColor="#333333"GridLines="None">
<RowStyleBackColor="#FFFBD6"ForeColor="#333333"/>
<FooterStyleBackColor="#990000"Font-Bold="True"ForeColor="White"/>
<PagerStyleBackColor="#FFCC66"ForeColor="#333333"HorizontalAlign="Center"/>
<SelectedRowStyleBackColor="#FFCC66"Font-Bold="True"ForeColor="Navy"/>
<HeaderStyleBackColor="#990000"Font-Bold="True"ForeColor="White"/>
<AlternatingRowStyleBackColor="White"/>
<Columns>

<asp:BoundFieldDataField="Firstname"HeaderText="Firstname"/>
<asp:BoundFieldDataField="Middlename"HeaderText="Middlename"/>
<asp:BoundFieldDataField="Lastname"HeaderText="Lastname"/>
</Columns>
</asp:GridView>
</div>

</form>

</body>
</html>


Vb Code::::----------------------------
Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports System.Configuration
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Imports System.Web.UI.HtmlControls
PartialClassDeleteMultipleRecordFromGridandTransfertoanotherGrid
InheritsSystem.Web.UI.Page
DimoblGFAsNewGlovalFunction
DimobjrunAsNewruntimetable
ProtectedSubPage_Load(ByVal sender AsObject, ByVal e AsSystem.EventArgs) HandlesMe.Load
IfNotPage.IsPostBackThen

binddataGrid3()
binddataGrid4()
EndIf


EndSub
PrivateSubbinddataGrid3()
Dim ds AsNewDataSet
ds = oblGF.selectdataforregtableforaddress()
        GridView1.DataSource = ds
GridView1.DataBind()
EndSub
PrivateSubbinddataGrid4()
Dim ds AsNewDataSet
ds = oblGF.selectdataforregtableforaddress()
        GridView3.DataSource = ds
GridView3.DataBind()
EndSub
ProtectedSubBtnDelete_Click(ByVal sender AsObject, ByVal e AsSystem.EventArgs) HandlesBtnDelete.Click
Try
ForEach row AsGridViewRowIn GridView1.Rows
DimcbAsCheckBox = DirectCast(row.FindControl("chkBox1"), CheckBox)
DimlblAsLabel = DirectCast(row.FindControl("lblId"), Label)
DimuidAsInteger = lbl.Text
Ifcb.CheckedThen
objrun.deletreAddressmaster(uid)

binddataGrid3()

EndIf


Next

Catch ex AsException

EndTry
EndSub

ProtectedSub Button1_Click(ByVal sender AsObject, ByVal e AsSystem.EventArgs) Handles Button1.Click
Try
Dim ds AsNewDataSet
DimdtAsNewDataTable
objrun.InitAdressContacttable()
objrun.dtaddressDetail.Rows.Clear()
Dim i AsInteger = 0
ForEach row AsGridViewRowIn GridView1.Rows
DimcbAsCheckBox = DirectCast(row.FindControl("chkBox1"), CheckBox)
DimlblAsLabel = DirectCast(row.FindControl("lblId"), Label)
DimuidAsInteger = lbl.Text
Ifcb.CheckedThen

dt = objrun.ShowRegdata1(uid)
objrun.dtaddressDetail.Rows.Add(objrun.dtaddressDetail.NewRow)
objrun.dtaddressDetail.Rows(i)(0) = dt.Rows(0).Item(0)
objrun.dtaddressDetail.Rows(i)(1) = dt.Rows(0).Item(1)
objrun.dtaddressDetail.Rows(i)(2) = dt.Rows(0).Item(2)
objrun.dtaddressDetail.Rows(i)(3) = dt.Rows(0).Item(3)
                    i = i + 1
'GridView2.DataSource = objrun.dtaddressDetail
'GridView2.DataBind()
EndIf


Next
            GridView2.DataSource = objrun.dtaddressDetail
GridView2.DataBind()
Catch ex AsException

EndTry
EndSub

ProtectedSubchkSelectAll_CheckedChanged(ByVal sender AsObject, ByVal e AsEventArgs)
ForEach row AsGridViewRowIn GridView3.Rows
DimcbAsCheckBox = DirectCast(row.FindControl("chkBox1"), CheckBox)
cb.Checked = DirectCast(sender, CheckBox).Checked
Ifcb.CheckedThen
row.BackColor = Drawing.Color.BlanchedAlmond
Else
row.BackColor = Drawing.Color.White
EndIf

Next
EndSub
ProtectedSubchkuncheck_CheckedChanged(ByVal sender AsObject, ByVal e AsEventArgs)
Dim row AsGridViewRow = GridView3.SelectedRow
Dim i AsInteger = GridView3.SelectedIndex

'For Each row As GridViewRowIn GridView3.Rows
DimcbAsCheckBox
cb = DirectCast(row.FindControl("chkBox1"), CheckBox)
'    cb.Checked = DirectCast(sender, CheckBox).Checked

Ifcb.Checked = FalseThen

row.BackColor = Drawing.Color.Blue
Else
row.BackColor = Drawing.Color.Cyan

EndIf

'Next
EndSub

ProtectedSub GridView1_RowDataBound(ByVal sender AsObject, ByVal e AsSystem.Web.UI.WebControls.GridViewRowEventArgs) Handles GridView1.RowDataBound
Ife.Row.RowType = DataControlRowType.DataRowThen
e.Row.Attributes.Add("onmouseover", "MouseEvents(this, event)")
e.Row.Attributes.Add("onmouseout", "MouseEvents(this, event)")

EndIf
EndSub

'Protected Sub GridView3_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView3.SelectedIndexChanged
'    Try
'        For Each row As GridViewRowIn GridView3.Rows
'            Dim cb As CheckBox = DirectCast(row.FindControl("chkBox1"), CheckBox)
'            If cb.Checked Then
'                row.BackColor = Drawing.Color.BlanchedAlmond
'            Else
'                row.BackColor = Drawing.Color.Aqua

'            End If
'        Next
'    Catch ex As Exception

'    End Try

'End Sub
'Protected Sub gv_RowCommand(ByVal sender As Object, ByVal e As GridViewCommandEventArgs)
'    If e.CommandName = "Show" Then
'        Dim RowIndex1 As Integer = Convert.ToInt32((e.CommandArgument).ToString())
'        Dim cb As CheckBox = DirectCast(RowIndex1.FindControl("chkBox1"), CheckBox)


'    End If
'End Sub



ProtectedSub GridView3_RowDataBound(ByVal sender AsObject, ByVal e AsSystem.Web.UI.WebControls.GridViewRowEventArgs) Handles GridView3.RowDataBound
'Dim row As GridViewRow = e.Row
''Dim i As Integer = GridView3.SelectedIndex

''For Each row As GridViewRowIn GridView3.Rows
'Dim cb As CheckBox
'cb = DirectCast(row.FindControl("chkBox1"), CheckBox)
''    cb.Checked = DirectCast(sender, CheckBox).Checked

'If cb.Checked = False Then

'    row.BackColor = Drawing.Color.Blue
'Else
'    row.BackColor = Drawing.Color.Cyan

'End If

Ife.Row.RowType = DataControlRowType.DataRowThen
If (String.IsNullOrEmpty(e.Row.Cells(0).Text) <>True) OrElse (e.Row.Cells(0).Text <>" ") Then
'Dim result As String = Convert.ToInt32(e.Row.Cells(2).Text)
'If result = "M.S" Then
e.Row.Cells(0).BackColor = System.Drawing.Color.Aquamarine
'Else
'    e.Row.Cells(3).BackColor = System.Drawing.Color.BlanchedAlmond
'End If
EndIf
EndIf

EndSub
ProtectedSub chkSelectAll_CheckedChanged1(ByVal sender AsObject, ByVal e AsEventArgs)
Try

ForEach row AsGridViewRowIn GridView3.Rows
DimcbAsCheckBox = DirectCast(row.FindControl("chkBox1"), CheckBox)
' cb.Checked = DirectCast(sender, CheckBox).Checked
Ifcb.CheckedThen
row.BackColor = Drawing.Color.BlanchedAlmond
Else
row.BackColor = Drawing.Color.Yellow
EndIf

Next

Catch ex AsException

EndTry
EndSub

'Protected Sub GridView3_RowCommand(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewCommandEventArgs) Handles GridView3.RowCommand
'    Try
'        Dim index As Integer = Convert.ToInt32(e.CommandArgument)

'        Dim gvRow As GridViewRow = GridView1.Rows(index)

'    Catch ex As Exception

'    End Try


'End Sub
EndClass