📄 clear.asp

📁 聊天室源码呵呵你好用~~~~~~2.0版本

💻 ASP

字号:

<%@ LANGUAGE=VBScript%>
<%Response.Expires=0
if Session("a_c_user_name")="" then
 Response.write "<b>[操作失败]</b><p>您尚未登录（或已经超时退出），不能进行此操作！"
 Response.end
end if%><html>
<head>
<title>清屏操作</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type='text/css'>
<!--
.p9 {line-height: 150%; font-size: 9pt;}
.p12 {line-height: 150%; font-size: 12pt;}
body {line-height: 150%;font-size : 12pt;}
A  {text-decoration: none;}
A:Hover  {text-decoration : none;}
a:visited {  color: #0000FF}
-->
</style>
</head>
<body bgcolor="FFFFFF">
<h1 align="center"><font color="0099FF">【清屏操作】</font></h1>
<hr noshade size="1" color=009900>
<p><b>[功能简介]</b></p>
<blockquote>
<p>清屏操作是用于将聊天室对话区的所有对话内容全部清除干净。当有网友在聊天室里散布违法言论，或故意捣乱时，可以执行此项操作，将其清除。</p>
<p> 请慎用此功能！不要无端清屏。而且您的清屏操作会被系统记录在《聊务公开》栏中供聊友们监督。</p>
<p><font color="FF0000">注：只有拥有５级以上的权限才能执行此项操作。（您目前为 <%=Session("a_c_user_level")%> 级）</font></p>
<p><%if Session("a_c_user_level")>=5 then%></p>
<form method="post" action="clearok.asp">
<p><b>●</b> 请输入清屏的原因（&lt;=100字符） </p>
<p> 
<input type="text" name="clearwhy" size="50" maxlength="100">
<input type="submit" name="clearok" value="清屏">
</p>
</form>
<p> <%end if%></p>
</blockquote>
<hr noshade size="1" color=009900>
<div align="center" class="p9"><script src="use.asp"></script>　<script src="sn.asp"></script><br><script src="copyright.asp"></script></div>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -