al hacer clic contabilizar mensaje como leido

[CHuLoSoY]

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.