Ver Mensaje Individual
  #1 (permalink)  
Antiguo 18/05/2004, 11:54
PaXXeL
 
Fecha de Ingreso: abril-2004
Ubicación: Zaragoza
Mensajes: 63
Antigüedad: 21 años, 1 mes
Puntos: 0
Solucion: Bucle?

Hola!
tengo el siguiente codigo con el cual intento que muestre en el area de texto los 4 últimos campos introducidos en una tabla (TOP 3), pero solo me muestra el último, debería hacer un bucle para que muestre los 3 últimos? si es así no se como, do ... loop? o con algo del recordset( no lo controlo demasiado )
Ahi va el c odigo y gracias de antemano

<% dim conn,rs,nombre,mensaje,fecha

Set Conn = Server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.RecordSet")
Conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("basesdedatos\libvis.mdb"))
consulta_SQL= "SELECT TOP 3 mensajes.Nombre, mensajes.Mensaje, mensajes.Fecha FROM mensajes ORDER BY mensajes.Fecha DESC;"
Conn.execute consulta_SQL
RS.Open consulta_SQL ,conn,1,3
ruta = request("mensaje")


%>
<textarea name="textarea"><%="Usuario: " & rs("nombre") & & " " & "Mensaje: " & rs("mensaje")%></textarea>
---------------------------------------------------
Saludos