Foros del Web » Programando para Internet » ASP Clásico »

al hacer clic contabilizar mensaje como leido

Estas en el tema de al hacer clic contabilizar mensaje como leido en el foro de ASP Clásico en Foros del Web. necesito hacer algo asi como mensajero personal, entonces al hacer click en el mensaje que automaticamente me marque este para la proxima vez como leido. ...
  #1 (permalink)  
Antiguo 16/11/2002, 14:29
Avatar de ElAprendiz  
Fecha de Ingreso: enero-2002
Ubicación: Maipu, Chile
Mensajes: 3.706
Antigüedad: 23 años, 3 meses
Puntos: 2
al hacer clic contabilizar mensaje como leido

necesito hacer algo asi como mensajero personal, entonces al hacer click en el mensaje que automaticamente me marque este para la proxima vez como leido. una idea de como hacerlo?
__________________
Manual de ASP Avanzado ;-)
  #2 (permalink)  
Antiguo 16/11/2002, 15:01
Avatar de Muzztein  
Fecha de Ingreso: agosto-2002
Ubicación: Hangar 18
Mensajes: 1.703
Antigüedad: 22 años, 8 meses
Puntos: 16
con un campo en la bd que guarde un uno si fue leido y un 0 en el caso que no haya sido leido.

  #3 (permalink)  
Antiguo 16/11/2002, 15:16
Avatar de ElAprendiz  
Fecha de Ingreso: enero-2002
Ubicación: Maipu, Chile
Mensajes: 3.706
Antigüedad: 23 años, 3 meses
Puntos: 2
pero como?

como se que se ha producido ese evento???
__________________
Manual de ASP Avanzado ;-)
  #4 (permalink)  
Antiguo 16/11/2002, 18:23
Avatar de CHuLoSoY  
Fecha de Ingreso: febrero-2002
Ubicación: Ribeira (Galicia)
Mensajes: 1.900
Antigüedad: 23 años, 3 meses
Puntos: 29
pues es bastante sencillo, en la bd hacer un campo LEIDO y al abrir el mensaje que cambie el campo leído a SI. Luego haces un if en la página de mostrar mensajes y si LEIDO es SI entonces el mensaje no tiene negrita, sino tiene negrita. Algo así:

-------
if rs.Fields("leido")="si" then
msg=rs.Fields("asunto")
else
msg="<b>"&rs.Fields("asunto")&"</b>"
end if

response.write msg
--------

Bueno, este código fue improvisado pero funcionaría. Y para cambiar a si al abrir el mensaje podría ser algo así (en caso de ser access la bd):

------
<%
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("base.mdb")&";"

strsql = "SELECT * FROM mensajes where id="&Request.Form("id")&""

Set rs = Server.CreateObject("ADODB.RecordSet")
RS.open strsql, oConn, 3, 3

rs("leido")="si"
rs.update

rs.Close
set rs=nothing
oConn.Close
%>
--------


Este código también fue improvisado pero supongo que funcionaría perfectamente. Espero que te sirva.

Saludos.
__________________
ESQUIO Dominios y Hosting
Las mejores características con los mejores precios.
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta

SíEste tema le ha gustado a 1 personas




La zona horaria es GMT -6. Ahora son las 10:18.