<%
set conexion = Server.CreateObject("ADODB.Connection")
conexion.open "GestorContenidos"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.CursorType=1
dim sql
sql="Select * from software_gratis order by Fecha desc"
rs.Open sql, conexion 'ABRE UNA RECORDSET RESULTADO DE UNA SETENCIA SQL
Do while not rs.EOF
%>