📄 mask.asp
字号:
<%@ LANGUAGE=VBScript%>
<script language=javascript>
var winbgcolor = parent.cbg();
var winbgimage = parent.cbi();
document.writeln("<body bgcolor=" + winbgcolor + " background=" + winbgimage + " bgproperties=fixed topmargin=3 leftmargin=3>");
</script>
<style type='text/css'>
body{font-family:\"宋体\";font-size:10.5pt;line-height:135%;}td{font-family:\"宋体\";font-size:10.5pt;line-height:135%;}.p9{color=FFFF00;font-size:9pt;}A{color:white;text-decoration:none;}A:Hover{color:black;text-decoration:none;}A:Active {color:black}</style>
<body oncontextmenu=self.event.returnValue=false bgcolor="<%=chatbgcolor%>" background="<%=chatimage%>" bgproperties="fixed" topmargin="20">
<p align="center"><font size="3" color="#FFFFFF">屏蔽讨厌鬼</font></p>
<%
if not isarray(session("dv_user")) then
Response.End
end if
dv_user=session("dv_user")
masklist=" "&Request.QueryString("masklist")&" "
online=Application("onlinelist")
online=split(online," ")
sn=0
for i=lbound(online) to ubound(online) -1
if online(i+1)<>username then
if instr(1,","&s12&",",","&online(i+1)&",")=0 then
if instr(masklist," "&online(i+1)&" ")=0 then
msg=msg&"<input type=checkbox onclick=javascript:parent.mask('"&online(i+1)&"'); id=checkbox1 name=checkbox1> <font color=#ffffff>"&online(i+1)&"</font><br>"
else
msg=msg&"<input type=checkbox onclick=javascript:parent.mask('"&online(i+1)&"'); checked id=checkbox1 name=checkbox1> <font color=#ffffff>"&online(i+1)&"</font><br>"
end if
end if
end if
next
Response.Write msg
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -