当前位置: 代码迷 >> ASP >> asp
  详细解决方案

asp

热度:143   发布时间:2013-07-09 09:50:47.0
asp 求助!
平台:DW MX +asp+access
开发了一个邮件表单,问题如果新邮件未读显示"new"红色字体标记,已读字体消失,求问具体实现代码

------解决方案--------------------
你给你的发送的邮件的表设置一个字段,如果字段=0 就是未读,字段=1 就是已读,例如
if rs("字段")=0 then .Write"<span style='color:#F00'>未读</sapn>"
if rs("字段")=1 then .Write"已读"
------解决方案--------------------
id=Cint(Request(id))
Set Rs=Server.CreateObject("ADODB.RecordSet")
Sql="Select 状态字段 From [消息] Where ID="&id&""
Rs.Open sql,Conn,1,3
If Rs.eof or Rs.bof then
response.write("没有此消息")
Else
  if Rs(0)<>1 then
     conn.execute("update [消息] set 状态字段=1 where id="&id&"")
  end if
end if
rs.close
set rs=nothing

 这样测试吧... 取的id 你可以根据你自己的换,
  相关解决方案