<%
Set conexion=Server.CreateObject("ADODB.Connection")
Set registros=Server.CreateObject("ADODB.Recordset")
conexion.open"driver={Microsoft Access Driver(*.mdb)};&_
"DBQ="& Server.MapPath("noticia.mdb")&";"
sSQL="Select*From noti Order by id"
set RS=conexion.Execute(sSQL)
%>
