Click here to Skip to main content
12,295,976 members (61,117 online)
Rate this:
 
Please Sign up or sign in to vote.
See more: VB VB.NET
I have created a Dynamic linkbutton at run time in girdview that shows Group total using Row_Created event of Gridview and i want to get Click event of this linkbutton.when we click this linkbutton a method called

Protected Sub GrdAllDist_RowCreated(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GrdAllDist.RowCreated
 

       Dim IsSubTotalRowNeedToAdd As Boolean = False
 
       If (strPreviousRowID <> String.Empty) AndAlso (DataBinder.Eval(e.Row.DataItem, "DistCode") IsNot Nothing) Then
           If strPreviousRowID <> DataBinder.Eval(e.Row.DataItem, "DistCode").ToString() Then
               IsSubTotalRowNeedToAdd = True
           End If
       End If
 
       If (strPreviousRowID <> String.Empty) AndAlso (DataBinder.Eval(e.Row.DataItem, "DistCode") Is Nothing) Then
           IsSubTotalRowNeedToAdd = True
           intSubTotalIndex = 0
       End If
 
       If IsSubTotalRowNeedToAdd Then
           Dim grdViewProducts As GridView = DirectCast(sender, GridView)
 
           Creating a Row
           Dim SubTotalRow As New GridViewRow(0, 0, DataControlRowType.DataRow, DataControlRowState.Insert)
 
           HeaderCell = New TableCell()
          Dim TotalRec_sub_link As New LinkButton()
         TotalRec_sub_link.Text = String.Format("{0}", TotalRec_sub)
          HeaderCell.Controls.Add(TotalRec_sub_link)
         HeaderCell.HorizontalAlign = HorizontalAlign.Center
           SubTotalRow.Cells.Add(HeaderCell)
End If
 End Sub
this is the method

Private Sub TotalRec_sub_link_click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Try
 
            status = "ALL"
            Dim DtSubList As DataTable
            Dim objcrl As New Circle()
 
            Dim gvRow As GridViewRow = CType(CType(sender, Control).Parent.Parent, GridViewRow)
            Dim index As Integer = gvRow.RowIndex
 
            hfdistSubID = gvRow.FindControl("SubtotHiddnDistID")
 
            distSubID = CType(hfdistSubID.Value, Integer)
            If deptsubID <> 0 And distSubID <> 0 Then
                DtSubList = objcrl.ListSubAllDistDeprtRpt(deptsubID, status, distSubID, CType(Session("fdt"), String), CType(Session("tdt"), String))
                dvSub = New DataView(DtSubList, "", "DistName,DeptName", DataViewRowState.CurrentRows)
                ViewState("DtSubList") = dvSub.ToTable()
                GrdSubGrid.Visible = True
                GrdSubGrid.DataSource = dvSub
                GrdSubGrid.DataBind()
                Session("reporSubtList") = dvSub.ToTable()
                GrdAllDist.DataSource = CType(Session("reportList"), DataTable)
                GrdAllDist.DataBind()
            End If
        Catch ex As Exception
 
        End Try
 
    End Sub
Please Help me and Thanks in advance.
Posted 6-Feb-13 20:16pm
Edited 6-Feb-13 20:20pm
ujju.15.1K
v2

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
Top Experts
Last 24hrsThis month


Advertise | Privacy | Mobile
Web01 | 2.8.160525.2 | Last Updated 7 Feb 2013
Copyright © CodeProject, 1999-2016
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100