|
|
También visite nuestro foro para discutir estos temas
<% 'Abre la conexion con la base de datos a traves de una conexion ODBC Set con = Server.CreateObject("ADODB.Connection") Con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("noticias.mdb")&";" 'Ejecuta un sentencia SQL de consulta sql = "SELECT * FROM Noticias ORDER BY id DESC" Set result = con.Execute(sql) 'Recorre todas las filas del resultado Do While Not result.EOF ' Muestra la fila actual Response.Write " "&result.Fields("titulo")&" |
Fundación para la Autonomía y Desarrollo de la Costa Atlántica de Nicaragua
FADCANIC 2001 ®