Hola, a todos, he bajado el ej. del sistema de noticias con bd y necesito si alguien me puede ayudar con dos puntos.1 limitar el numero de resultados en el paginado.que debo agregar porfavor y donde.2 que aparezca al lado del titular una imagen fija, siempre la misma.desde ya muchisimas gracias a todos los que colaboran para solucionar la ignorancia.
noticia.asp
<%
Set con = Server.CreateObject("ADODB.Connection")
Con.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath("noticias.mdb"))
sql = "SELECT * FROM Noticias WHERE id=" & Request.QueryString("id") & ""
'Ejecuta un sentencia SQL de consulta
'Recorre todas las filas del resultado
set result = Con.Execute(sql)
%>
<html>
<head>
<title>Página nueva </title>
</head>
<body>
<p><font face="Arial" size="5" color="#0080C0"><%=result("titulo")%></font></p>
<p><font face="Arial" size="2"><strong><%=result("copete")%></strong></font></p>
<p><font face="Arial" size="2"><%=result("noticia")%></font></p>
</body>
</html>
listado.asp
<html>
<head>
<title>Listado de noticias</title>
</head>
<body>
<%
'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 = 2
'Recorre todas las filas del resultado
Do While Not result.EOF
' 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
result.MoveNext
Loop
'Libera memoria
result.Close
Set result = Nothing
con.Close
Set con = Nothing
%>
</body>
</html>
