你可以设置自动刷新啊,不一定要设置隐藏嘛,
主页面中<iframe src="shortmessage.asp" height=200 width=200 frameborder=0 border=0></frame>shortmessage.asp中
<head></head>间加入
<meta http-equip="refresh" content="15,url=shortmessage.asp">
15秒刷新依次
主页面中<iframe src="shortmessage.asp" height=200 width=200 frameborder=0 border=0></frame>shortmessage.asp中
<head></head>间加入
<meta http-equip="refresh" content="15,url=shortmessage.asp">
15秒刷新依次
<jnkc:Download id="jnkc_download" style="behavior:url(#default#download)" />
<script>
function jnkc_done(jnkc_data){
jnkc_show.innerHTML=jnkc_data;
}
function chk(){
jnkc_download.startDownload('sms.asp',jnkc_done);
}
setInterval('chk()', 60000);
</script>
<%
Session("username") = Server.HtmlEncode(Request.Form("txtUsername"))
Session("personalid")=0
%>
<HTML>
<HEAD>
<TITLE>Welcome to My Chatroom!</TITLE>
</HEAD>
<frameset border=0 frameSpacing=0 rows="280,0" frameBorder=0>
<frame name="display" src="display.asp">
<frame name="refresh" src="refresh.asp">
<frame name="message" src="message.asp">
</frameset>
</HTML>refresh.asp:
<HTML>
<HEAD>
<META HTTP-EQUIV="REFRESH" CONTENT=3 URL="refresh.asp">
</HEAD>
<BODY>
<SCRIPT language=VBScript>
Sub Window_OnLoad
<%
If Session("personalid") < Application("globalid") Then
%>
self.parent.display.document.write("<table width=100% border=0 cellPadding=0 cellSpacing=0><font color=#0000FF>"+"<%=Application("sender")%>"+"</font>: "+"<%=Application("message")%>"+"</table>")
<%
Session("personalid") = Application("globalid")
End If
%>
End Sub
</SCRIPT>
</BODY>
</HTML>display.asp:(相当于是空的)
<html>
<body>
message.asp为发消息的窗口