<%@LANGUAGE="VBSCRIPT"%> <% Dim Raiting Dim Raiting_numRows Set Raiting = Server.CreateObject("ADODB.Recordset") Raiting.ActiveConnection = MM_FINRURAL_STRING Raiting.Source = "SELECT * FROM Raiting ORDER BY Fecha DESC" Raiting.CursorType = 0 Raiting.CursorLocation = 2 Raiting.LockType = 1 Raiting.Open() Raiting_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Raiting_numRows = Raiting_numRows + Repeat1__numRows %> Innovacion y Desarrollo FINRURAL
Asociacion de Instituciones Financieras para el desarrollo rural Asociacion de Instituciones Financieras para el desarrollo rural
Innovacion y Desarrollo
RATING DE NUESTRAS ASOCIADAS

 
<% While ((Repeat1__numRows <> 0) AND (NOT Raiting.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Raiting.MoveNext() Wend %>
Institución Reporte Archivo
ANED
02/2005
 Ver
CIDRE
01/2005
 Ver
CRECER
10/2004
 Ver
FRIF DIACONIA
10/2004
 Ver
FADES
10/2004
 Ver
FONDECO
10/2004
 Ver
IDEPRO
10/2004
 Ver
PROMUJER
06/2002
 Ver

 

Acrobat Reader

 

 

 

<% Raiting.Close() Set Raiting = Nothing %>