Proyectos
  <% dim idProyectoActual idProyectoActual = -1 strSQL = "sp_pro_sel_proyectosImg " & sistema set rs = CreaRS(strSQL) Do while not rs.Eof if (idProyectoActual <> rs("idProyecto")) Then %> <% End if idProyectoActual = rs("idProyecto") rs.MoveNext Loop cerrarRS(rs) cerrar() %>
Aplicaciones para la Industria
 
<% dim idProyectoActual idProyectoActual = -1 strSQL = "sp_pro_sel_proyectosImg " & sistema set rs = CreaRS(strSQL) Do while not rs.Eof if (idProyectoActual <> rs("idProyecto")) Then %> <% End if idProyectoActual = rs("idProyecto") rs.MoveNext Loop cerrarRS(rs) cerrar() %>
Aplicaciones para la Administración
 
<% dim idProyectoActual idProyectoActual = -1 strSQL = "sp_pro_sel_proyectosImg " & sistema set rs = CreaRS(strSQL) Do while not rs.Eof if (idProyectoActual <> rs("idProyecto")) Then %> <% End if idProyectoActual = rs("idProyecto") rs.MoveNext Loop cerrarRS(rs) cerrar() %>
Aplicaciones para Interiorismo Comercial
 
<% dim idProyectoActual idProyectoActual = -1 strSQL = "sp_pro_sel_proyectosImg " & sistema set rs = CreaRS(strSQL) Do while not rs.Eof if (idProyectoActual <> rs("idProyecto")) Then %> <% End if idProyectoActual = rs("idProyecto") rs.MoveNext Loop cerrarRS(rs) cerrar() %>
Aplicaciones para Interiorismo de Viviendas