如何自动刷新聊天室在线名单
<%
online=Application("onlinelist")
online=split(online," ")
Response.Write "<script language=javascript>parent.f6.document.open();"
Response.Write "var winbgcolor = parent.cbg();var winbgimage = parent.cbi();"
Response.Write "parent.f6.document.writeln(""<body bgcolor="" + winbgcolor + "" background="" + winbgimage + "" bgproperties=fixed >"");"
Response.Write "parent.f6.document.writeln(""<style type='text/css'>A:visited{TEXT-DECORATION: none;Color:#000000}A:active{TEXT-DECORATION: none;Color:#000000}A:hover{TEXT-DECORATION: underline;Color:#000000}A:link{text-decoration: none;Color:#000000}BODY{FONT-FAMILY: '宋体'; FONT-SIZE: 12px;}</style>"");"
Response.Write "msg='<a href=javascript:parent.seluser(\'大家\'); target=f2>大家</a><br>';parent.f6.document.writeln('当前在线( "&ubound(online)&" )人<br>');"
for i=lbound(online) to ubound(online)-1
Response.Write "msg=msg+'<a href=javascript:parent.seluser(\'"&online(i)&"\'); target=f2>"&online(i)&"</a><br>';"
next
Response.Write "parent.f6.document.writeln(msg);"
Response.Write "</script>"
%>
online=Application("onlinelist")
online=split(online," ")
Response.Write "<script language=javascript>parent.f6.document.open();"
Response.Write "var winbgcolor = parent.cbg();var winbgimage = parent.cbi();"
Response.Write "parent.f6.document.writeln(""<body bgcolor="" + winbgcolor + "" background="" + winbgimage + "" bgproperties=fixed >"");"
Response.Write "parent.f6.document.writeln(""<style type='text/css'>A:visited{TEXT-DECORATION: none;Color:#000000}A:active{TEXT-DECORATION: none;Color:#000000}A:hover{TEXT-DECORATION: underline;Color:#000000}A:link{text-decoration: none;Color:#000000}BODY{FONT-FAMILY: '宋体'; FONT-SIZE: 12px;}</style>"");"
Response.Write "msg='<a href=javascript:parent.seluser(\'大家\'); target=f2>大家</a><br>';parent.f6.document.writeln('当前在线( "&ubound(online)&" )人<br>');"
for i=lbound(online) to ubound(online)-1
Response.Write "msg=msg+'<a href=javascript:parent.seluser(\'"&online(i)&"\'); target=f2>"&online(i)&"</a><br>';"
next
Response.Write "parent.f6.document.writeln(msg);"
Response.Write "</script>"
%>
...全文
相关推荐
聊天室的制作与设计
小小聊天室的制作与设计小小聊天室的制作与设计
WCF做Winform的聊天室 有在线名单列表
WCF做Winform的聊天室 有在线名单列表,可以群聊,私聊 供入门级别的网友学习 先开启服务器端,再打开客户端
php 自动刷新聊天室
该聊天室采用数据库存取数据的方式,用户下载后修改账号密码,该代码实现了自动刷新,聊天内容发布和显示基本实现无时差显示。欢迎批评指正。
在线聊天室在线聊天室在线聊天室在线聊天室
在线聊天室在线聊天室v在线聊天室在线聊天室
基于 visual studio开发的在线聊天室
这是一个基于 visual studio开发的在线聊天室,通过登录进入聊天室,可显示当前在线人数,发言人的姓名及内容


