📄 kill.asp

📁 此聊天室程序可运行在任何支持ASP的Web服务器中

💻 ASP

字号:

<!--#INCLUDE FILE="inc_config.asp"-->
<!--#INCLUDE FILE="inc_dbconn.asp"-->
<html>
<head>
<title>聊天室踢人功能</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
body      {  font-size: 10.4pt }
td        {  font-size: 10.4pt }
.normal   {  <%=m_button%> ; font-size: 10.4pt}
.over     {  <%=m_buttonover%> ; font-size: 10.4pt}
.down     {  <%=m_buttondown%> ; font-size: 10.4pt}
-->
</style>
</head>

<body bgcolor="<%=m_bg2%>" text="<%=m_text2%>">
<br>
<table border="1" align="center" cellpadding="3" cellspacing="0" width="300">
  <form method="POST" action="kill.asp">
    <tr> 
     <td align="center" bgcolor="<%=m_bg1%>" style="color:<%=m_text1%>">我 要 踢 人</td>
    </tr>
    <tr>
      <td style="padding-left:20pt">踢谁： 
        <select name="name">
     <% for i=1 to 100
        if application("user" & i) <> "" then %> 
     <option value='<% =application("user" & i) %>'> <% =application("user" & i) %> 
     <% end if
        next %> 
     </select>
        <br>
        踢法： 
        <input type="radio" name="lo" value="o" checked>不踢IP
     <input type="radio" name="lo" value="l">
        踢IP <br>
        原因： <input type="text" name="why" size="20" maxlength=100>
     <br><input type="submit" value="  踢  " class="normal" onmouseover="this.className='over'" onmousedown="this.className='down'" onmouseout="this.className='normal'">
     <input type="button" value="关  闭" class="normal" onmouseover="this.className='over'" onmousedown="this.className='down'" onmouseout="this.className='normal'" onClick="window.close()">
     </td>
    </tr>
   </form>
  </table>
  <table width="300" border="0" align="center">
  <tr>
    <td> 
      <div align="center"><font color="#000000">此聊天室是<font color="#FF0000">未注册</font>版本如果满意请注册<br>
        方法请点击</font><a href="ccc.asp" target="_blank">这里</a></div>
   
</td>
  </tr>
</table>
  </body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -