• Viernes 8 de Noviembre de 2024, 19:04

Autor Tema:  Hyperlink O Imagebutton Con Url  (Leído 2744 veces)

josealh

  • Nuevo Miembro
  • *
  • Mensajes: 8
    • Ver Perfil
Hyperlink O Imagebutton Con Url
« en: Lunes 17 de Septiembre de 2007, 11:08 »
0
Hola a todos,

Tengo el siguiente problema para enlazar una URL a una imagen. He probado de dos formas pero lo que le falta
a uno lo tiene el otro y viceversa.
Deseo poner una imagen y cuando pinchen sobre ella se abra un documento o una url. Lo hago en tiempo de ejcución.
He encontrado dos formas:

1) Con HyperLink:

Código: Text
  1. Dim HyperFoto As New System.Web.UI.WebControls.HyperLink
  2. HyperFoto.ImageUrl = "img/" & Application("strImagenFoto").ToString()
  3. HyperFoto.NavigateUrl = "xxxxxxxxxxxxx"
  4. HyperFoto.Height = New System.Web.UI.WebControls.Unit(20)
  5. HyperFoto.Width = New System.Web.UI.WebControls.Unit(50)
  6.  

pero tengo el problema que cuando cambio el tamaño del control, si el tamaño de la foto es mayor, me deja el de ésta y
sale grande, no lo redimensiona.

2) Con ImageButton:

Resuelvo el problema anterior pero no tiene propiedad NavigateUrl.

Código: Text
  1. Dim Foto As New System.Web.UI.WebControls.ImageButton
  2. Foto.ImageUrl = "img/" & Application("strImagenFoto").ToString()
  3. Foto.Width = New System.Web.UI.WebControls.Unit(250)
  4. Foto.Height = New System.Web.UI.WebControls.Unit(200)
  5. 'Foto.Attributes.Add("onclick", "xxxxxxxxxxxxx")
  6. 'Foto.Attributes("onclick") = "xxxxxxxxxxxxxxxx"
  7. 'Foto.ResolveUrl("xxxxxxxxxxxxxxxxxxxxxx")
  8. 'Foto.Attributes.Add("onclick", "javascript:url('xxxxxxxxxxxxxx');")
  9.  
Lo que está entre comillas es lo que he intentado y nada. Y también he puesto:

Private Sub Foto_Click(ByVal sender As System.Object, ByVal e As System.Web.UI.ImageClickEventArgs)
   Response.Redirect("xxxxxxxxxxxxxxx")
End Sub

pero tampoco funciona. ¿alguien sabe como puedo enviar una URL en tiempo de ejcuación a una imagen?

Gracias y un saludo a todos.

F_Tanori

  • Moderador
  • ******
  • Mensajes: 1919
  • Nacionalidad: mx
    • Ver Perfil
Re: Hyperlink O Imagebutton Con Url
« Respuesta #1 en: Lunes 17 de Septiembre de 2007, 12:16 »
0
Prueba con OnClientClick

y ahi le mandas llamar una funcion de javascript

por ejemplo


Código: Text
  1. Foto.onclientclick="LinkImagen()"
  2.  



Código: Text
  1.  
  2.     <script type="text/javascript">
  3.  
  4.       function LinkImagen()
  5.       {
  6.            top.location.href="http://foros.solocodigo.com";
  7.       }    
  8.      
  9.     </script>
  10.  
  11.  

Espero te sirva hace mucho que no utilizo .NET

Saludos
" ExIsTo y A vEcEs PiEnSo "

NOTA:
===========================================================================================================================
Este foro es para ayudar, aprender, compartir... usenlo para eso,
NO SE RESUELVEN DUDAS POR MENSAJE PRIVADO Y MENOS POR CORREO
===========================================================================================================================

josealh

  • Nuevo Miembro
  • *
  • Mensajes: 8
    • Ver Perfil
Re: Hyperlink O Imagebutton Con Url
« Respuesta #2 en: Lunes 17 de Septiembre de 2007, 14:08 »
0
Gracias por tu respuesta,

No existe onclientclick. He resuelto (a medias) el problema de la siguiente forma:

Código: Text
  1. Foto.Attributes.Add("onclick", "window.open('wwwww.com');")
  2.  

Ahora salta en una nueva ventana la URL o IMG o DOC, pero en la ventana principal vuelve a llamarse a si mismo. No me deja lo que había, vuelve a llamar al .aspx y me quita toda la consulta que he realizado.

Un saludo

josealh

  • Nuevo Miembro
  • *
  • Mensajes: 8
    • Ver Perfil
Re: Hyperlink O Imagebutton Con Url
« Respuesta #3 en: Martes 18 de Septiembre de 2007, 08:42 »
0
Ya lo he solucionado. Añadir al HyperLink el control Image:

Dim imgFotos As New System.Web.UI.WebControls.Image
imgFotos.ImageUrl = "dctmdes5/intranet/Avances/img/" & Application("strImagenFoto").ToString()
imgFotos.Width = New System.Web.UI.WebControls.Unit(200)
imgFotos.Height = New System.Web.UI.WebControls.Unit(150)

Dim HyperFoto As New System.Web.UI.WebControls.HyperLink
HyperFoto.NavigateUrl = "mediocad.com"
HyperFoto.Controls.Add(imgFotos)

Thanks