<%
set conexion = Server.CreateObject("ADODB.Connection")
conexion.open "GestorContenidos"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.CursorType=1
dim sql
sql="Select * from utilidades order by Fecha DESC"
rs.Open sql, conexion 'ABRE UNA RECORDSET RESULTADO DE UNA SETENCIA SQL
dim contador
contador=0
Do while not rs.EOF
if contador=0 then
response.write("
