📄 badwordcfg.asp
字号:
<% Option Explicit %>
<!--#include file="conn.asp" -->
<html>
<head>
<title>屏蔽关键字</title>
<link href="includes/style.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<div align="center"><span class="heading">管理过滤关键词<br>
<br />
<a href="menu.asp" target="_self">返回到管理主菜单</a><br />
<form name="frmAddNewWords" method="post" action="badword.asp">
<table width="574" border="0" cellspacing="0" cellpadding="1" bgcolor="#000000">
<tr>
<td> <table width="100%" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF">
<tr>
<td align="center"> <span class="lgText">添加新过滤关键词</span><br /> <br />
<span class="text">输入你要过滤的关键字和用来替换的词</span><br /> <table width="300" border="0" cellspacing="0" cellpadding="0" bgcolor="#000000">
<tr>
<td> <table width="100%" border="0" cellspacing="1" cellpadding="4">
<tr bgcolor="#CCCCCC" align="center">
<td width="50%" class="tHeading"><b>你要过滤的关键词</b></td>
<td width="50%" class="tHeading"><b>替换为</b></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="50%"> <input type="text" name="badWord1" maxlength="49"> </td>
<td width="50%"> <input type="text" name="replaceWord1" maxlength="49"> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="50%"> <input type="text" name="badWord2" maxlength="49"> </td>
<td width="50%"> <input type="text" name="replaceWord2" maxlength="49"> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="50%"> <input type="text" name="badWord3" maxlength="49"> </td>
<td width="50%"> <input type="text" name="replaceWord3" maxlength="49"> </td>
</tr>
</table></td>
</tr>
</table>
<br /> <input type="submit" name="Submit" value="添加关键字"> <br /> <br /> </td>
</tr>
</table></td>
</tr>
</table>
<br />
<br />
</form>
<table width="574" border="0" cellspacing="0" cellpadding="1" bgcolor="#000000">
<tr>
<td> <table width="100%" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF">
<tr>
<td height="255"> <div align="center">
<p class="text"><span class="lgText"><b>删除过滤关键词</b></span><b></b><br />
</p>
</div>
<div align="center">
<form name="frmModerators" method="post" action="delbadword.asp">
<table width="300" border="0" cellspacing="0" cellpadding="0" bgcolor="#000000">
<tr>
<td bgcolor="#000000"> <table width="100%" border="0" cellspacing="1" cellpadding="4" height="14">
<tr bgcolor="#CCCCCC" class="tHeading">
<td width="18%" height="2" align="center"><b>删除</b></td>
<td width="44%" height="2" align="center"><b>过滤关键词</b></td>
<td width="38%" height="2" align="center"><b>替换为</b></td>
</tr>
<%
strSQL = "SELECT timesword.* FROM timesword ORDER BY timesword.mist ASC;"
rsConn.Open strSQL, adoCon
Do While NOT rsConn.EOF
%>
<tr bgcolor="#FFFFFF">
<td width="18%" align="center" height="24"> <input type="checkbox" name="chkWordID" value="<% = rsConn("wordid") %>"> </td>
<td width="44%" height="24" align="left" class="text">
<% = rsConn("mist") %>
</td>
<td width="38%" height="24" align="left" class="text">
<% = rsConn("okworld") %>
</td>
</tr>
<%
rsConn.MoveNext
Loop
rsConn.Close
Set rsConn = Nothing
adoCon.Close
Set adoCon = Nothing
%>
</table></td>
</tr>
</table>
<br />
<input name="Submit" type="submit" value="删除过滤关键词">
<br />
</form>
</div></td>
</tr>
</table></td>
</tr>
</table>
<br />
</div>
<br />
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -