减小字体
增大字体- ·上一篇文章：windows服务器启用TCP-IP筛选提高安全
- ·下一篇文章：如何配置局域网中的通讯协议
日期：2006-07-19 15:18:33 来源：www.cngr.cn
在线用户列表显示文件list.asp、出错信息文件error.asp
在线用户列表显示文件list.asp
<%
dim onliuser,onlinum
onliuser=application("onliuser")
onlinum=(len(onliuser)-len(replace(onliuser,"','","")))/3+1
%><html><head><title>在线名单</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
.p9 {font-size: 9pt}
a:visited {color: #0000FF; text-decoration: none}
a:link {color: #0000FF; text-decoration: none}
a:hover{color: #ff0000;}
-->
</style>
</head><body bgcolor=ffebd9><p align=center>在线名单[<% =onlinum %>人]
<p class='p9'>
<a href="javascript:parent.cs('所有人')">所有人</a><br>
<script>
for (var i=0;i<parent.list.length;i++) delete parent.list[i]
parent.list=new Array(<% =mid(onliuser,2) %>);
luser();
function luser(){
parent.list.sort();
for (var i=0;i<parent.list.length;i++){
document.write("<a href=\"javascript:parent.cs('"+parent.list[i]+"')\">["+parent.list][i]+"]</a><br>");
}
}
document.write ("<br><br><a href='http://swuse.yeah.net' target=_blak>软件使用主页</a><br>温馨情缘聊天");
</script>
出错信息文件error.asp
<%
mess=request("mess")
response.write "<center>"&mess&"<br><br><a href='login.asp'>返回</a></center>" %>
<%
dim onliuser,onlinum
onliuser=application("onliuser")
onlinum=(len(onliuser)-len(replace(onliuser,"','","")))/3+1
%><html><head><title>在线名单</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
.p9 {font-size: 9pt}
a:visited {color: #0000FF; text-decoration: none}
a:link {color: #0000FF; text-decoration: none}
a:hover{color: #ff0000;}
-->
</style>
</head><body bgcolor=ffebd9><p align=center>在线名单[<% =onlinum %>人]
<p class='p9'>
<a href="javascript:parent.cs('所有人')">所有人</a><br>
<script>
for (var i=0;i<parent.list.length;i++) delete parent.list[i]
parent.list=new Array(<% =mid(onliuser,2) %>);
luser();
function luser(){
parent.list.sort();
for (var i=0;i<parent.list.length;i++){
document.write("<a href=\"javascript:parent.cs('"+parent.list[i]+"')\">["+parent.list][i]+"]</a><br>");
}
}
document.write ("<br><br><a href='http://swuse.yeah.net' target=_blak>软件使用主页</a><br>温馨情缘聊天");
</script>
出错信息文件error.asp
<%
mess=request("mess")
response.write "<center>"&mess&"<br><br><a href='login.asp'>返回</a></center>" %>
Tags：
作者：佚名
- 好的评价 如果您觉得此文章好，就请您
0%(0) 
- 差的评价 如果您觉得此文章差，就请您
0%(0) 
评论内容只代表网友观点，与本站立场无关！
评论摘要(共 0 条，得分 0 分，平均 0 分)
查看完整评论