ASP.NET - ImageButton JavaScript

Hola a todos, yo necesito hacer lo siguiente:

Mustro en una tabla 30 fotos mediante el control ImageBotton que lo hago mediante un for tomando el paso en una base de datos de esta forma: (resumida)

Dim rowCnt As Integer
Dim rowCtr As Integer
Dim cellCtr As Integer
Dim cellCnt As Integer

rowCnt = 3
cellCnt = 3

For rowCtr = 1 To rowCnt

Dim tRow As New TableRow()
Dim tRow2 As New TableRow()
For cellCtr = 1 To cellCnt
Dim tCell As New TableCell()
Dim tcell2 As New TableCell()
Dim a As New ImageButton
a.ImageUrl = pasobd
a.BorderWidth = 1
a.Height = 100
a.Width = 100
a.BorderColor = Drawing.Color.AntiqueWhite

Dim et As New Label()
et.Text = "Mensaje"
et.Height = 20
et.Width = 20

tCell.Controls.Add(a) 'objeto image (a)
tCell.BorderWidth = 1
tCell.Controls.Add(et) 'objeto etiqueta (et)
tCell.BorderWidth = 1

tRow.Cells.Add(tCell)
Ta.Rows.Add(tRow)

Next

Ahora bien una vez que muestro las fotos como hago para que al hacer click llamar a una funcion javascript para traer la foto al frente si no se como se llama los image ya que los agrego con el for ??

Muchas gracias
ahora

Pues por lo que veo en tu codigo tu creas tu objeto imagen pues acada objeto imagen agregale los atributos de javascript que necesites.

Saludos
Vicente Garcia.

Gracias Vicente por responder, si asi lo agrego solo que no se como agregarle dichos atributos cuando voy creando el objeto imagen.

Un saludo y gracias

Supongo ya tienes tu JavaScript
<script language="javascript">

function ConfirmDestroy()
{
if (confirm(document.getElementById('confirmationText').value) == true)
return true;
else
return false;
}

</script>
<asp:Literal Runat="server" ID="ltlConfirmScript"></asp:Literal>

Del Lado del Servidor solo lo agregas asi
Iamge.Attributes.Add("OnClick", "return ConfirmDestroy();")

Pruebalo asi Saludos.

Vicente Garcia

Bueno Vicente, gracias por tomarte tu tiempo.

Mira copie el codigo y no me funciona, yo lo hago funcionar solo cuando a los objetos les doy un nombre en tiempo de diseño, no cuando los creo mediante el codigo, entonces no se como pasarle la ruta de la imagen.

Yo lo hago asi:

function url3(rutaImagen) {
hidden = open(rutaImagen,'NewWindow','top=100,left=100,width=400,height=300,status=yes,resizable=yes,scrollbars=yes');
}

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
imagen = ????????
ImagenBotton.Attributes.Add("onclick", "javascript:url3('" & imagen & "');")
End Sub

Ahi en la variable imagen no se como pasarle el paso, digamos como que no me toma cuando hago un click sobre la imagen que va creando a medida que avanza el bucle.

Espero haber sido claro, cualquier cosa aca te dejo mi correo:

[email protected]

Un saludo y gracias.

Pues cada que vas a gregando un Image pasale como parametro el id del Cliente
ejemplo

Dim rowCnt As Integer
Dim rowCtr As Integer
Dim cellCtr As Integer
Dim cellCnt As Integer

rowCnt = 3
cellCnt = 3

For rowCtr = 1 To rowCnt

Dim tRow As New TableRow()
Dim tRow2 As New TableRow()
For cellCtr = 1 To cellCnt
Dim tCell As New TableCell()
Dim tcell2 As New TableCell()
Dim a As New ImageButton
Dim img As New HtmlImage
img.ID = "img" + CStr(cellCtr)


img.Attributes.Add("OnClick", "ConfirmDestroy('" + img.ClientID + "');")

img.Border = 1
img.Height = 100
img.Width = 100

Dim et As New Label()
et.Text = "Mensaje"
et.Height = 20
et.Width = 20

tCell.Controls.Add(a) 'objeto image (a)
tCell.BorderWidth = 1
tCell.Controls.Add(et) 'objeto etiqueta (et)
tCell.BorderWidth = 1

tRow.Cells.Add(tCell)
Ta.Rows.Add(tRow)

Next
Next

Hola Vicente, perdon por las molestias pero yo pongo el codigo asi como me dijiste:

Dim rowCnt As Integer
Dim rowCtr As Integer
Dim cellCtr As Integer
Dim cellCnt As Integer

rowCnt = 3
cellCnt = 3

For rowCtr = 1 To rowCnt

Dim tRow As New TableRow()
Dim tRow2 As New TableRow()
Dim img As New HtmlImage
For cellCtr = 1 To cellCnt
Dim tCell As New TableCell()
Dim tcell2 As New TableCell()
Dim a As New ImageButton

img.ID = "img" + CStr(cellCtr)

a.ImageUrl = paso
a.Height = 150
a.Width = 150

img.Attributes.Add("OnClick", "ConfirmDestroy('" + img.ClientID + "');")

img.Border = 1
img.Height = 100
img.Width = 100

tCell.Controls.Add(a) 'objeto image (a)
tCell.BorderWidth = 1

tRow.Cells.Add(tCell)
ta.Rows.Add(tRow)

Next
Next

Lo que no logro es pasar el paso de la imagen al script para que la levante. perdon pero no logro solucionarlo.

Un saludo y gracias