今天发现一个网站和我的一模一样，然后，我在后台添加了新闻以后，他那边也就自动增加了，删除，那边也就没了，这是被盗链，还是被采集？我该如何解决？

dim ComeUrl,cUrl,ComIP,rsIPs
ComIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
ComeUrl=lcase(trim(request.ServerVariables("HTTP_REFERER")))
if ComIP="" then
ComIP=Request.ServerVariables("REMOTE_ADDR")
else
response.write "<br><p align=center><font color='red'>对不起，不允许盗链。你的 IP "&ComIP& 已记录"</font></p>"
response.end
end if

这段代码放在头部可以嘛？

是
限制了只能从本地链接才能访问..但是别放在首页....

我放上去了，但是好像没作用，我添加内容，那个网站还是也就有信息的.

各位帮帮忙啊，情况紧急！

啊 .........不好意思 ........代码没贴完 ........
重新修改了下代码:

dim ComeUrl,cUrl,AdminID,AdminLoginIP
ComeUrl=lcase(trim(request.ServerVariables("HTTP_REFERER")))
if ComeUrl="" then
response.write "<br><p align=center><font color='red'>对不起，为了系统安全，不允许直接输入地址访问。</font></p>"
response.end
else
cUrl=trim("http://" & Request.ServerVariables("SERVER_NAME"))
if mid(ComeUrl,len(cUrl)+1,1)=":" then
cUrl=cUrl & ":" & Request.ServerVariables("SERVER_PORT")
end if
cUrl=lcase(cUrl & request.ServerVariables("SCRIPT_NAME"))
if lcase(left(ComeUrl,instrrev(ComeUrl,"/")))<>lcase(left(cUrl,instrrev(cUrl,"/"))) then
response.write "<br><p align=center><font color='red'>对不起，为了系统安全，不允许从外部链接地址访问本网页。</font></p>"
response.end
end if
end if

那我再试试哈

那我的首页内容被盗链的话，怎么办呢？

问题已经解决了，谢谢!