隐藏页面的使用方法及代码分享
发布网友
发布时间：2022-05-17 16:20
共1个回答
热心网友
时间：2023-10-29 05:35
隐藏页面这种黑帽SEO作弊方式属于比较复杂的方式，需要黑帽seoer拥有较强的编程能力，我本来想写套代码分享给大家，可是最终没有测试成功，下面这串代码是我在网上找到的，能否正确的起作用，请各位自己尝试，如果你是一位编程高手，希望你可以给大家总结一份正确的代码和IP数据库，到时我会发布出来方便大家下载和浏览。
<%
function cip(sip)
tip=cstr(sip)
sip1=left(tip,cint(instr(tip,.)-1))
tip=mid(tip,cint(instr(tip,.)+1))
sip2=left(tip,cint(instr(tip,.)-1))
tip=mid(tip,cint(instr(tip,.)+1))
sip3=left(tip,cint(instr(tip,.)-1))
sip4=mid(tip,cint(instr(tip,.)+1))
cip=cint(sip1)*256*256*256+cint(sip2)*256*256+cint(sip3)*256+cint(sip4)
end function
ipconnpath = count/ip.mdb
vip=Request.servervariables(REMOTE_ADDR)
%><%
set connip=server.createobject(adodb.connection)
DBPath = Server.MapPath(ipconnpath)
connip.Open driver={Microsoft Access Driver (*.mdb)};dbq= & DBPath
ipnow=cip(vip)
Set rsip = Server.CreateObject(ADODB.Recordset)
sql=select * from ip where (onip<= & ipnow & and offip>= & ipnow & )
rsip.Open sql,connip,1,1
vwhere=left(rsip(addj),2)
rsip.Close
set rsip=nothing
connip.Close
set connip=nothing%>
<%
select case vwhere
case 湖南
Response.Redirect web/
case 河南
Response.Redirect home/
case else
Response.Redirect main/
end select
%>
如果可以将搜索引擎蜘蛛的IP地址汇总齐全，那这种方式对于某些搜索引擎不收录的站点类型是比较实用的，不过想将搜索引擎蜘蛛的IP汇总齐全这个是很难的工作，只要你忽略了一个，那这个蜘蛛就会返回真实的抓取的信息，通过多个搜索引擎蜘蛛的返回信息的对比，就可以知道这个网站是否已经作弊，这个属于恶性黑帽作弊，其后果是屏蔽网站。
