<%if not rshome.eof then
do while not rshome.eof
if rshome("id") = 1 then
if rshome("Foto") <> "" then
foto1 = Imagen(rshome("Foto"))
end if
if foto1 <> "" or rshome("Descripcion") <> "" then%>
<%end if
end if%>
<%if rshome("id") = 2 then
if rshome("Foto") <> "" then
foto2 = Imagen(rshome("Foto"))
end if
if foto2 <> "" or rshome("Descripcion") <> "" then%>
<%end if
end if%>
<%if rshome("id") = 3 then
if rshome("Foto") <> "" then
foto3 = Imagen(rshome("Foto"))
end if
if foto3 <> "" or rshome("Descripcion") <> "" then%>
<%end if
end if%>
<%rshome.movenext
loop
end if
rshome.close
set rshome = nothing%>
<%end if%><%=rshome("Descripcion")%>
<%end if%><%=rshome("Descripcion")%>
<%end if%><%=rshome("Descripcion")%>
