28,390
社区成员
发帖
与我相关
我的任务
分享
<%
Response.Buffer=True
Response.ExpiresAbsolute=Now()-1
Response.Expires=0
Response.CacheControl="no-cache"
Response.AddHeader "Pragma", "No-Cache"
%>
<!--#include file="conn.asp"-->
<!DOCTYPE html>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>个人中心</title>
<link href="images/img2.css" rel="stylesheet" type="text/css" />
<script>
function GetData()
{
url="xml.asp";
var http = new ActiveXObject("Microsoft.XMLHTTP");
http.open("GET",url,false);
http.send();
var str = http.responseText;
bb.innerHTML=str;
setTimeout("GetData()",1000);
}
</script>
</head>
<body onLoad="javascript:GetData();">
<div class="avatar"><span onclick="location.href='user.asp'" id="id2" style="cursor:pointer;">短消息<font color="#FF0000"><span id="bb">...</span></font></span></div>
</div>
<div id="fa">
<div style="float:left; margin-left:10px; color:#0075A9; line-height:25px;"><strong>发送短消息</strong></div>
<iframe name="fa2" width="500" height="450" scrolling="no" frameborder="0" id="fa2"></iframe>
</div>
<div id="ok">
<div class="div" style="float:right;">
<input type="submit" class="input" value="发短消息" onclick="document.getElementById('fa').style.display='block';fa2.location.href='message.asp';"/>
</div>
</div>
</body>
</html>
<%
Response.Buffer=True
Response.ExpiresAbsolute=Now()-1
Response.Expires=0
Response.CacheControl="no-cache"
Response.AddHeader "Pragma", "No-Cache"
%>
<!--#include file="conn.asp"-->
<%
sql="select * from Chat_ID where ID2s="&session("ID")&" and Chat_ID=0"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if rs.RecordCount=0 then
response.write""
else
%>
【您有<%=rs.RecordCount%>条未读消息】
<%end if%>