Saludos a todos.
Tengo un sistema de noticias en mi web y deseo que me muestre éstas de 3 en 3 o de 5 en 5 pero según yo mi codigo está bien y no aparecen las noticias.
ALGUIEN ME PUEDE AYUDAR A ENCONTRAR EL ERROR ???
Código:
<%
'Abre la conexion con la base de datos a traves de una conexion ODBC
Set con = Server.CreateObject("ADODB.Connection")
con.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("bd/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
i=0
Do While i=3
' Muestra la fila actual
Response.Write "<p><b><font face=Verdana size=1><a href=noticia.asp?id=" &result.Fields("id") & ">"&result.Fields("titulo")&"</a></b><br><font color=""#696969"">• " &result.Fields("copete") & "</font></font></p>"
'Pasa a la siguiente fila
i=i+1
result.MoveNext
Loop
'Libera memoria
result.Close
Set result = Nothing
con.Close
Set con = Nothing
%>
Gracias y Saludos de nuevo.