Dynamically Create AddressOf for ImageButton

[Scott]

Please help.

I have ImageButtons that are created dynamically and the event to be
called onclick of the button is stored in a database. The event
itself will be prewritten, however it is on a separate .vb page than
the aspx.vb codebehind file. I have not been able to get the button
to fire the event. here is the code:

Dim button as new imageButton
button.imageURL =image.gif
button.ID="butt onName"
AddHandler button.click, AddressOf btnLookup_Click
A separate section in the same .vb file is:
Protected Sub btnLDAPLookup_C lick(ByVal s As Object, ByVal e As
EventArgs)
DO SOMETHING
End Sub

What am I doing wrong? Should it be a protected sub? Does it matter
that the sub is located in a .vb file, with the button initialization,
that is not the same aspx.vb file?

Any help is greatly appreciated.

[Scott]

To add more detail I have copied and pasted the code below:

Public Shared Function getImageButton( ByVal buttonID As Integer, ByVal
imagePath As String)

Dim button As New ImageButton
Dim buttonDB As New SAFE.SAFEFuncti ons
Dim dbconnButton As IDbConnection = Nothing
Dim buttonReader As SqlDataReader
dbconnButton = buttonDB.GetCon nection
dbconnButton.Op en()
Dim getButtonSQL As String
getButtonSQL = SAFE.SAFEFuncti ons.getRequestI temDetail(butto nID)
Dim getButtonComman d As New SqlCommand(getB uttonSQL, dbconnButton)
buttonReader = getButtonComman d.ExecuteReader
Do While buttonReader.Re ad
Select Case
buttonReader("R equestConfigura tionObjectTypeP ropertiesID")
Case 8 'image source

button.ImageUrl = imagePath &
buttonReader("R equestObjectVal ue")
Case 22 'Alt Text
button.Alternat eText =
buttonReader("R equestObjectVal ue")
Case 23 'ID
button.ID = buttonReader("R equestObjectVal ue")
Case 24 'On Click Event

AddHandler button.Click, AddressOf
btnLDAPLookup_C lick()
End Select
Loop

buttonReader.Cl ose()
getButtonComman d.Dispose()
dbconnButton.Cl ose()
Return button
End Function

The btnLDAPLookup_C lick is as follows:
Private Sub btnLDAPLookup_C lick(ByVal s As Object, ByVal e As EventArgs)
do something here...
End Sub

Remember, these are both in the same .vb file, but not the aspx.vb for this
page. However, the function is called during the PageLoad function so I
thought this should work.

Again, any help is greatly appreciated.