<%
set oConn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("tubase.mdb")&";"
for ID=1 to 5 ' o el numero de categorias que tengas
SQL="Select top 5 * from tutabla where ID="&ID&" order by
rs.Open SQL, oConn,1,2
campo desc"
' aqui tendrias que crear una tabla o lo que quisieras para ver
' mejor los datos, yo te lo dejo asi a pelo
do while not rs.eof
%>
<a href="detalle.asp?ID=<%response.write("ID")%>">
' con esto creamos un vinculo a una pagina usando su ID para
' localizar ese registro donde sacaremos toda la noticia de forma detallada.
<%
response.write("Categoria ")
response.write("titulo ")
response.write("copete ")
loop
rs.close
next
%>
Por otra parte la pagina detalle.asp podria tener este codigo:
<%
set oConn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("tubase.mdb")&";"
varID=request.querystring("ID")
SQL="Select * from tutabla where ID="varID"
rs.Open SQL, oConn,1,2
' aqui tendrias que crear una tabla o lo que quisieras para ver
' mejor los datos, yo te lo dejo asi a pelo
do while not rs.eof
response.write("ID")
response.write("Categoria ")
response.write("titulo ")
response.write("copete ")
response.write("noticia")
response.write("imagen")
loop
rs.close
%>