Ver Mensaje Individual
  #1 (permalink)  
Antiguo 17/11/2003, 22:30
Avatar de sktrpunk
sktrpunk
 
Fecha de Ingreso: septiembre-2003
Ubicación: Montevideo
Mensajes: 227
Antigüedad: 21 años, 9 meses
Puntos: 0
Exclamación Contar Registros (URGENTE)

Hola amig@s, como estan???
Tengo un gran problema, el cual les paso a detashar.

La idea de la aplicacion es enviar mensajes internos entre los usuarios de mi sitio, para lo cual uso una base en la q almaceno, entre otras cosas, el mensaje, un booleano q indica si sha fue visto o no (campo "Visto") y el id de quien lo envia (campo "A_id").
Ahora, mediante una consulta, recupero los campos "Visto" siempre q sean False y q A_id sea igual al ID del usuario logeado actualmente, la cual almaceno en una variable de session al momento q le doy acceso al usuario al sitio.

Finalmente quiero contar esos campos para decirle al usuario: "Ud. tiene X mensajes nuevos".

Ahora, me surgio un problema q no puedo resolver, no se a q c debe, sha q no da error, pero nada me funciona.

* Se supone q si el RecordSet esta vacio, un RecordCount devolveria un valor -1 (o me equivoco???) y asi es, devuelve un -1, PERO si hago un <% if rs.EoF then %> no corre los comandos, por lo q no cumple la condicion de estar vacio... o tengo un problema de conceptos o algo anda mal en mi codigo, sha q es MUY contradictorio y cada vez entiendo menos.

Les muestro el codigo, pueden copiarlo y pegarlo en algun editor, asi, tal cual lo tengo sho en mi pagina.
Código:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file ="validate.inc"-->
<%
   rs.Open "SELECT Visto FROM Mensajes WHERE A_id = "&Session("iduser")&" AND Visto = False", Conn
%>
<%
   Dim regs
   regs = rs.RecordCount + 1
%>
<html>
<head>
<title>Leer Mensajes</title>
</head>

<body bgcolor="#003366" text="#FFFFFF">

<p>&nbsp;</p>
<p align="center">Leer Mensajes Nuevos</p>
<p>&nbsp;</p>
<table width="250" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td><p align="center">
<%
   if rs.EoF then
      Response.Write("Ud no tiene mensajes nuevos en su cuenta")
   else if regs = 1 then
      Response.Write("Ud tiene 1 mensaje nuevo")
   else if regs > 1 then
      Response.Write("Ud tiene"& regs &"mensajes nuevos")
   end if
   end if
   end if
%>
      </p>
      </td>
  </tr>
</table>
</body>
</html>
Nota: En validate.inc hago toda la conexion ODBC y valido al usuario para q no pueda acceder a esa pagina a menos q se haya registrado anteriormente.

En fin, ese es el codigo q me esta consumiendo, no tengo NI IDEA de q puede estar mal, espero su ashuda

Muchas gracias a tod@s
Saludos

AlvAro
__________________
- Sk8 FoR LiFe -
Stay away from my Black Book

Última edición por sktrpunk; 17/11/2003 a las 22:33