26/07/2004, 14:06
|
 | Colaborador | | Fecha de Ingreso: enero-2002 Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses Puntos: 146 | |
| Prueba con:
<%
Dim Conn
Set Conn= Server.CreateObject ("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("..\db\noticias.mdb"))
Set registros = Server.createobject("ADODB.Recordset")
registros.Open "SELECT * FROM 2003 ORDER titulo, fecha,contenido", Conn
while not registros.EOF()
response.write registros(0)&"<br>" 'o lo que desees hacer
registros.MoveNext
Wend
%>
Saludos |