ASP y sigue sigue ...

[majesus]

:) FUNCIONA ... ;)

¿Y algún código sencillito para paginar y que mantenga la estructura del siguiente código?

<%
Dim oConn,strSQL, objRS

Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\agencias.mdb"))

strSQL = "SELECT Nombre, Email, Web, Direccion, Pais, Telefono, Especialidad, Comentarios FROM datos ORDER BY nombre"
Set objRS = oConn.Execute(strSQL)

%>
<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=1 class=dia2>

<%

while (not objRS.Eof)
Response.Write("<tr><td class=diaviolin><img border=0 src=../images/archivo2.gif width=32 height=32> " & objRS("Nombre") & "</td></tr><tr><td valign=top>Especialidad: " & objRS("Especialidad") & " </td></tr><tr><td>Email: <a href=""mailto:" & objRS("Email") & """>" & objRS("Email") & "</a></td></tr><tr><td>Web: <a href=""" & objRS("Web") & """>" & objRS("Web") & "</a></td></tr><tr><td>Dirección: &quo t; & objRS("Direccion") & "</td></tr><tr><td>País: " & objRS("Pais") & "</td></tr><tr><td>Teléfono: &quot ; & objRS("Telefono") & "</td></tr><tr><td valign=top>Comentarios: " & objRS("Comentarios") & " </td></tr>")
objRS.MoveNext
wend

oConn.Close
set objRS = nothing
set oConn = nothing

%>

</table>




GRACIAS POR TODO ...

Majesus

<a href="http://www.canalpublicidad.com"><img border="0" src="http://www.canalpublicidad.com/images/banner_crystal_g.gif" width="468" height="60"></a>