<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rsInformes__MMColParam rsInformes__MMColParam = "false" If (Request("MM_EmptyValue") <> "") Then rsInformes__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rsInformes Dim rsInformes_cmd Dim rsInformes_numRows Set rsInformes_cmd = Server.CreateObject ("ADODB.Command") rsInformes_cmd.ActiveConnection = MM_ConnCepredeComunicacion_STRING rsInformes_cmd.CommandText = "SELECT * FROM Tienda ORDER BY DashBoard ASC, Forest Desc, Prioridad*-1 DESC" rsInformes_cmd.Prepared = true rsInformes_cmd.Parameters.Append rsInformes_cmd.CreateParameter("param1", 11, 1, -1, rsInformes__MMColParam) ' adBoolean Set rsInformes = rsInformes_cmd.Execute rsInformes_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 rsInformes_numRows = rsInformes_numRows + Repeat1__numRows %> <% seccion="informes" subseccion="12" %>
<% dominio = Replace(Request.ServerVariables("HTTP_HOST"),"www.","") llamadaAbsoluta = "https://www." & dominio %>

Informes y documentos

Tienda virtual

Compra tu informe en la TIENDA VIRTUAL de CEPREDE.

<%if mantenimientoTienda then%>

Estamos realizando tareas de mantenimiento, por favor intente acceder de nuevo más tarde.

Disculpe las molestias.

<%end if%> <% rsInformes.Close() Set rsInformes = Nothing %>

Sorry, no posts matched your criteria.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<% dominio = Replace(Request.ServerVariables("HTTP_HOST"),"www.","") llamadaAbsoluta = "https://www." & dominio %>