ASP小偷如何屏蔽某一篇文章。。
如果我要屏蔽这篇文章http://www.
用下面这段代码是可以屏蔽掉。。可是屏蔽了这个，其他文章页面就不行了，显示500错误，应该怎么做呢？？
有其他的代码么？该怎么写？？
start=instr(content," 为中国")
over=instr(content,"复什么了<script")
str=mid(content,start,over-start)
content=replace(content,str," ")
以下是这个文件的全部代码。。
<!--#include file="init.asp"-->
<!--#include file="config.asp"-->
<%
bid=request("bid")
cid=request("cid")
id=request("id")
url="http://www.
content=getHTTPPage(url)
start=instr(content,"<title>")+7
over=instr(content,"</title>")
title=mid(content,start,over-start)
start=instr(content,"<script type=""text/javascript"">")
over=instr(content,"<script src")
str=mid(content,start,over-start)
content1=re(str,"(\d*)\.html","read.asp?bid="&bid&"&cid="&cid&"&id=$1")
start=instr(content,"<div id=""Content"">")
over=instr(content,"<div id=""End"">")
content=mid(content,start,over-start)
content=replace(content,"index.html","booklist.asp?bid="&bid&"&cid="&cid&"&id="&id&"")
start=instr(content,"<TABLE cellSpacing=0")
over=instr(content,"<div id=""BookText"">")
str=mid(content,start,over-start)
content=replace(content,str,"<div align=center><script src=js/ad3.js></script></div>")
start=instr(content,"<table width=""100%"" border=""0"">")
over=instrrev(content,"<TABLE cellSpacing=0")
str=mid(content,start,over-start)
content=replace(content,str,"<div align=center><script src=js/ad3.js></script></div>")
start=instr(content,"<TD class=""tb0"" vAlign=""bottom""")
over=instr(content,"<TD class=""tbsep"">")
str=mid(content,start,over-start)
content=replace(content,str,"")
start=instrrev(content,"<TD class=""tb0"" vAlign=""bottom""")
over=instrrev(content,"<td vAlign=""bottom"">")
str=mid(content,start,over-start)
content=replace(content,str,"")
content=re(content,"(\d*)\.html","read.asp?bid="&bid&"&cid="&cid&"&id=$1")
content=replace(content,"http://www.,"js/ad2.js")
content=replace(content,"http://www.,"js/read_top.js")
content=replace(content,"http://www.,"js/read_bottom.js")
content=replace(content,"/js/zhangjie/5.js","js/ad2.js")
content=replace(content,"/js/zhangjie/content_top.js","js/read_top.js")
content=replace(content,"/js/zhangjie/content_bottom.js","js/read_bottom.js")
content=replace(content,"src=""http://img","src=""image.asp?url=http://img")
%>
<html>
<head>
<title><%=title%>$<%=sitename%>-手打小说_全文字小说_TXT小说下载_免费小说_玄幻小说_武侠小说_VIP小说在线阅读</title>
<meta http-equiv="Content-Type" content="text/html; charset=gbk" />
<meta name="keywords" content="<%=keywords%>" />
<meta name="description" content="<%=descript%>" />
<link href="/boss/Common.Css" rel="stylesheet" type="text/css" />
<link href="/boss/Book.Css" rel="stylesheet" type="text/css" />
<script type="text/javascript" src="/boss/common.js"></script>
<%=content1%>
<script src="boss/output.js"></script>
</head>
<body bgColor="#DCECF5">
<center>
<div id="Ws">
<div id="Top">
<table width="100%" border="0" cellspacing="0" cellpadding="0" bgColor=#DCECF5><tr>
<td height="8" colspan="9"></td></tr><tr><td height="23" align="left"> <a href=<%=site%>>返回首页</a> </td><td width="120" align="center" background="/boss/yddh.gif"><a href="down.asp?bid=<%=bid%>&cid=<%=cid%>" target="_blank">TXT全本下载</a></td><td width="120" align="center" background="/boss/yddh.gif"><a href="booklist.asp?bid=<%=bid%>&cid=<%=cid%>">章节目录</a></td>
<td width="120" align="center" background="/boss/yddh.gif"><a href=info.asp?bid=<%=bid%>&cid=<%=cid%>>返回书页</a></td></tr></table>
<div id="TextSelect"><script src="TextSet.js"></script></div>
<table border="0">
<tr>
<td align=center>
<SPAN id=ad_01></SPAN></td>
</tr>
</table>
</div>
<%=content%>
<center><!--#include file="foot.asp"--></center>
<script src="http://www.yxg.cc/configs/article/BookText.js"></script>
</body>
</html>
