| |
<%
set conexion = Server.CreateObject("ADODB.Connection")
conexion.open "GestorContenidos"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.CursorType=1
dim sql
sql="Select Titulo,Descripcion,Link,Texto_Link,Atencion from noticias order by Fecha DESC"
rs.Open sql, conexion 'ABRE UNA RECORDSET RESULTADO DE UNA SETENCIA SQL
Do while not rs.EOF
response.write(" |
