
07/06/2006, 11:46
|
 | Colaborador | | Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 21 años, 6 meses Puntos: 27 | |
While Not RS1.EOF
<%=RS1( "Nombre" )%>
<%=RS1( "Clave_discusion" )%><br>
Set rs2 = Server.CreateObject("ADODB.Recordset")
Sql2 = "SELECT count(*) as cuantos From Comentarios where C_discusion = " & RS1( "Clave_discusion" ) & "
Set rs2 = Conexion.execute (Sql2)
contador2=rs2.fields("cuantos")
RS1.MoveNext
Wend
rs1.close
__________________ JuanRa Pérez
San Salvador, El Salvador |