Pregunta sobre funciones

[mkgreidi]

Hola,tengo una pequeña duda.
Según un id de producto que me llega por parametro necesito cargar 3 fotos diferentes en la pagina,cada foto en una zona diferente.
Lo tengo hecho y funciona correctamente con 3 funciones,una para cada foto,y en la zona que toque llamo a la funcion que corresponda.Las tres funciones son iguales a esta

Sub mostrar_foto(ByVal id)
dsfoto = ws.ODataset("foto", "SELECT nombre FROM menu_telematel WHERE idpadre=2 AND activado=1 AND intranet=0 AND id=" & id & " ")
Dim nombre = Replace(dsfoto.Tables("foto").Rows(0).Item("nombre "), " ", "_")
Response.Write("<img src='images/")
Response.Write(nombre)
Response.Write(".gif' alt='image' width='210' height='280' />")
End Sub

El caso es que hago la misma consulta 3 veces,y me gustaría saber si hay alguna manera de por ejemplo,en una sola funcion asignar el valor de cada foto a una variable y despues recuperar esta variable en el .aspx donde corresponda
Gracias

[chcma]

Yo haría lo siguiente:

1-. Crearía una pagina.aspx, que será la que reciba el ID, y la que devolverá un objeto imagen.

2-. Luego en cada sitio de la página donde quieras meter la imagen correspondiente lo ahría de la siguiente manera:

Código:

<asp:image id='imgImagenIzquierda' runat='server' imageurl='paginaImagen.aspx?id=<%=idImagen%>' AlternateText='tu texto' />
<br />
<asp:image id='imgImagenDerecha' runat='server' imageurl='paginaImagen.aspx?id=<%=idImagen%>' AlternateText='tu texto' />

[diegopedro]

Hola mkgreidi

- Create una Pag asp.net, en ella create 3 propiedades

Partial Class PAGINA Inherits System.Web.UI.Page
Public PROP_MIIMAGEN1 As String
Public PROP_MIIMAGEN2 As String
Public PROP_MIIMAGEN3 As String

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
' ---------------------------------------
' Recupera en un select los 3 nombres de las imagenes y dejalos en un resulset
' ---------------------------------------
' SELECT nombre FROM menu_telematel WHERE (idpadre=2 AND activado=1 AND intranet=0 AND id=1) or (idpadre=3 AND activado=1 AND intranet=0 AND id=1) or (idpadre=4 AND activado=1 AND intranet=0 AND id=1))
' Recorre el resulset y almacena en las 3 variables
if eselprimero then
PROP_MIIMAGEN1 = rs(0).value
elseif eselsegundo then
PROP_MIIMAGEN2 = rs(0).value
elseif eseltercero then
PROP_MIIMAGEN3 = rs(0).value
end if
' ---------------------------------------
' Luego asigna las variables a las imagenes ubicadas en las zonas establecidas

<img src='images/<%=PROP_MIIMAGEN1%>.gif' alt='image' width='210' height='280' />

Suerte







- 1ro recupera en un select los 3 nombres de tus imagenes
-