Adding click event to linkbutton

[Jack]

Hi,

I am new to .NET and need help with adding click event on LinkButton
programatically .

Please see the code below. I would like to add a click event on LinkButton
returned from "Function EditLink". This LinkButton should fire "Sub EditNav"
when clicked.
=============== =============== ========

Function GetNavTable(ByV al NavType As Integer) As Table
Dim NavTable As New Table
NavTable.CellSp acing = 1
NavTable.CssCla ss = "contenttab le"
NavTable.Width = Unit.Percentage (100)

Dim DataTable As AppDataSet.Navi gationDataTable =
BLL.GetNavigati onByType(NavTyp e)
Dim RSRow As AppDataSet.Navi gationRow

For Each RSRow In DataTable
Dim Row As New TableRow
Dim Header As New TableCell
Dim LinkText As New TableCell
Dim LinkUrl As New TableCell
Dim Sorting As New TableCell
Dim EditCell As New TableCell
Dim EditLink As New LinkButton
EditLink = GetEditLink(RSR ow.NavId)
Header.Text = RSRow.NavId
LinkText.Text = RSRow.LinkText
LinkUrl.Text = RSRow.LinkUrl
Sorting.Text = RSRow.Sorting
EditCell.Contro ls.AddAt(0, EditLink)
Row.Cells.Add(H eader)
Row.Cells.Add(L inkText)
Row.Cells.Add(L inkUrl)
Row.Cells.Add(S orting)
Row.Cells.Add(E ditCell)
NavTable.Rows.A dd(Row)
Next
Return NavTable
End Function

Function GetEditLink(ByV al NavID As Integer) As LinkButton
Dim EditLink As New LinkButton
'How to make this LinkButton fire the "Sub EditNav" and pass
parameter NavID?
Return EditLink
End Function

Sub EditNav(ByVal NavIID As Integer)
'Code to execute when EditLink is clicked on.
End Sub

=============== =============== =========
Any help will be appriciated.

Tnx.

[Jack]

After searching through the net and pulling my hair for a couple of hours, i
have now figured out how to do this. :-)

In case anyone is interested in knowing, here is how we add an event handler
on a dynamic button/linkbutton:

Public Shadows Function GetEditLink(ByV al NavID As Integer) As
LinkButton
Dim EditUrl As New LinkButton
EditUrl.Command Name = "EditComman d"
EditUrl.Command Argument = NavID.ToString( )
AddHandler EditUrl.Command , AddressOf EditNav
EditUrl.Text = "Edit"
Return EditUrl
End Function

Sub EditNav(ByVal sender As Object, ByVal e As CommandEventArg s)
If e.CommandName.C ompareTo("EditC ommand") = "0" Then
Label1.Text = "Arg: " & e.CommandArgume nt.ToString()
End If
End Sub
"Jack" <[e-mail] e in message
news:uO******** ******@TK2MSFTN GP03.phx.gbl...

Hi,

I am new to .NET and need help with adding click event on LinkButton
programatically .

Please see the code below. I would like to add a click event on LinkButton
returned from "Function EditLink". This LinkButton should fire "Sub
EditNav" when clicked.
=============== =============== ========

Function GetNavTable(ByV al NavType As Integer) As Table
Dim NavTable As New Table
NavTable.CellSp acing = 1
NavTable.CssCla ss = "contenttab le"
NavTable.Width = Unit.Percentage (100)

Dim DataTable As AppDataSet.Navi gationDataTable =
BLL.GetNavigati onByType(NavTyp e)
Dim RSRow As AppDataSet.Navi gationRow

For Each RSRow In DataTable
Dim Row As New TableRow
Dim Header As New TableCell
Dim LinkText As New TableCell
Dim LinkUrl As New TableCell
Dim Sorting As New TableCell
Dim EditCell As New TableCell
Dim EditLink As New LinkButton
EditLink = GetEditLink(RSR ow.NavId)
Header.Text = RSRow.NavId
LinkText.Text = RSRow.LinkText
LinkUrl.Text = RSRow.LinkUrl
Sorting.Text = RSRow.Sorting
EditCell.Contro ls.AddAt(0, EditLink)
Row.Cells.Add(H eader)
Row.Cells.Add(L inkText)
Row.Cells.Add(L inkUrl)
Row.Cells.Add(S orting)
Row.Cells.Add(E ditCell)
NavTable.Rows.A dd(Row)
Next
Return NavTable
End Function

Function GetEditLink(ByV al NavID As Integer) As LinkButton
Dim EditLink As New LinkButton
'How to make this LinkButton fire the "Sub EditNav" and pass
parameter NavID?
Return EditLink
End Function

Sub EditNav(ByVal NavIID As Integer)
'Code to execute when EditLink is clicked on.
End Sub

=============== =============== =========
Any help will be appriciated.

Tnx.