📄 badmanlist.asp
字号:
<%Response.Expires=0
Response.ExpiresAbsolute = Now() - 1
Response.AddHeader "Pragma","No-Cache"
Response.AddHeader "Cache-Control","Private"
Response.CacheControl = "No-Cache"
if not IsArray(Session("info")) then Response.Redirect "err1.asp?kind=01"
info=Session("info")
if InStr(Application("maninfo"),"," & info(0) & ",")<>0 then Response.Redirect "manyou.asp"
%>
<!--#INCLUDE FILE="config.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="javascript">
function call(towho)
{window.open("callyou.asp?towho="+towho,"callwindow","height=170,width=280,left=150,top=60,resizable=no,scrollbars=auto,status=no,toolbar=no,menubar=no,location=no")}
</script>
<title>坏人名单</title>
<style>
<!--
a:active { font-size: 10pt; color:<%=zzbird_chattext%> ;TEXT-DECORATION: none}
a:link { font-size: 10pt; color:<%=zzbird_chattext%> ;TEXT-DECORATION: none}
a:visited { font-size: 10pt; color:<%=zzbird_chattext%> ;TEXT-DECORATION: none}
a { font-size: 10pt; color:<%=zzbird_chattext%> ;TEXT-DECORATION: none}
body{SCROLLBAR-HIGHLIGHT-COLOR: buttonface;
SCROLLBAR-SHADOW-COLOR: buttonface;
SCROLLBAR-3DLIGHT-COLOR: buttonhighlight;
SCROLLBAR-TRACK-COLOR: #eeeeee;
SCROLLBAR-DARKSHADOW-COLOR: buttonshadow}
body { font-size: 9pt; color: <%=zzbird_chattext%> }
.but { border-style: ridge; border-width: 1; background-color:
<%=zzbird_butbg%> ;color: <%=zzbird_buttext%>;CURSOR: hand; }
-->
</style>
</head>
<body bgcolor="<%=zzbird_chatbg%>" <%if zzbird_chatbgpic<>"" then%>background="<%=zzbird_chatbgpic%>"<%end if%> text="<%=zzbird_chattext%>" style="font-size: 10pt" topmargin="6" leftmargin="6">
<div align="center">坏人名单</div>
<hr>
<div align="center">(<a href="javascript:opener.parent.addbadman2('')">点击此处添加坏人</a>)</div>
<br><br><br>
<%
if info(14)="," then
Response.Write "<div align='center'>还没有任何坏人</div>"
else
info(14)=Replace(info(14),",","",1,1)
badmanlist=split(info(14),",")
for i=0 to ubound(badmanlist)-1
if InStr(Application("zzbird_name"),"," & badmanlist(i) & ",")<>0 then
Response.Write " " & badmanlist(i) & " <font style='font-size:9pt' color='#FFFF00'>(在线)</font><br> (<a href=javascript:call('" & badmanlist(i) & "')>呼叫 </a>/<a href=javascript:opener.parent.delbadman2('" & badmanlist(i) & "')> 撤销</a>)<br>"
else
Response.Write " " & badmanlist(i) & " <font style='font-size:9pt' color='#EAEAEA'>(不在线)</font><br>"
end if
next
end if
%>
<br><br>
<div align="center"><input type="button" value="关闭窗口" class="but" onclick="window.close()"></div>
</body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -