Click here to Skip to main content
11,485,334 members (77,744 online)
Rate this: bad
Please Sign up or sign in to vote.
See more: 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.HorizontalAlign = HorizontalAlign.Center
End If
 End Sub
this is the method

Private Sub TotalRec_sub_link_click(ByVal sender As System.Object, ByVal e As System.EventArgs)
            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
                Session("reporSubtList") = dvSub.ToTable()
                GrdAllDist.DataSource = CType(Session("reportList"), DataTable)
            End If
        Catch ex As Exception
        End Try
    End Sub
Please Help me and Thanks in advance.
Posted 6-Feb-13 21:16pm
Edited 6-Feb-13 21:20pm

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

  Print Answers RSS
0 Sergey Alexandrovich Kryukov 380
1 Maciej Los 365
2 Mehdi Gholam 210
3 Frankie-C 134
4 OriginalGriff 134
0 Sergey Alexandrovich Kryukov 8,819
1 OriginalGriff 7,982
2 Sascha Lefèvre 3,199
3 Maciej Los 2,841
4 Richard Deeming 2,370

Advertise | Privacy | Mobile
Web04 | 2.8.150520.1 | Last Updated 7 Feb 2013
Copyright © CodeProject, 1999-2015
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