Saludos... Estoy pogramando un despliegue de clasificados.
Abro la base de datos sin problemas
<%
'apertura de BD
Set conectar = Server.CreateObject("ADODB.Connection")
conectar.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("clasificados.mdb"))
set clasirs=Server.createobject("ADODB.Recordset")
clasirs.ActiveConnection = conectar
clasirs.Source = "data"
clasirs.open
clasirs.MoveFirst
do while not clasirs.EOF
%>
despliego el primer clsificado, preseleccionado por item dentro de una tabla
<tr>
<td width="319">
<table width="320" border="0">
<tr><td><b><% response.write clasirs("titulo")%></b></td></tr>
<tr><TD><% response.write clasirs("mensaje")%></TD></tr>
<tr><td><% response.write clasirs("email")%></td></tr>
</table>
</td>
deseo desplegar el segundo registro al lado del primero (si existe..)
clasirs.movenext
if clasirs.eof then
despiego la tabla vacia
else
<td width="319">
<table width="320" border="0">
<tr><td><b><% response.write clasirs("titulo")%></b></td></tr>
<tr><TD><% response.write clasirs("mensaje")%></TD></tr>
<tr><td><% response.write clasirs("email")%></td></tr>
</table>
</td>
end if
loop
Ahora cuando aumento el segundo registro ocuurre un error, parece que se pierde la informacion del loop, Si alguno de ustedes tiene una idea la agradezco... Gracias
