Dim HLImmagine As New HyperLink
HLImmagine = e.Item.FindControl("HLImmagine")
If Not IsNothing(HLImmagine) Then
lblTitoloGallery.Text = DataBinder.Eval(e.Item.DataItem, "Descrizione")
HLImmagine.NavigateUrl = "ImagePath.ashx?f=" & DataBinder.Eval(e.Item.DataItem, "Immagine") & "&tipo=g&X=500"
HLImmagine.ImageUrl = "ImagePath.ashx?f=" & DataBinder.Eval(e.Item.DataItem, "Immagine") & "&tipo=g&X=52"
HLImmagine.Attributes.Add("rel", "lightbox[" & Request.QueryString(Id_Nome) & "]")
HLImmagine.Attributes.Add("Title", "")
End If