我們都知道，外鏈對SEO很重要，其實真正做SEO的，到最后拼的都是鏈接資源，而不是什么別的技術(shù)，SEO新手由于缺乏資源，主要是外鏈資源，所以制約了效果，而SEO老手，往往通過時間的積累，手上擁有大量的優(yōu)質(zhì)外鏈資源，一般SEO老手都自己養(yǎng)著至少數(shù)十個高質(zhì)的站點用來給自己欲優(yōu)化的新站提供鏈接支持，所以在優(yōu)化的初始階段，SEO老手一般都不用為鏈接發(fā)愁。例如移不動網(wǎng)絡(luò)營銷，本身自己就運營著二十多個高質(zhì)量的網(wǎng)站，通過這些自己的鏈接，新的網(wǎng)站可以短時間被收錄并獲得充足的鏈接支持。

　　在外鏈的形式中，首頁明鏈的效果最佳，通常以友情鏈接的形式展現(xiàn)，如果你是專門做SEO的，那么肯定也會有自己的網(wǎng)站群為欲優(yōu)化的網(wǎng)站提供友情鏈接，這些網(wǎng)站友情鏈接的維護(hù)工作量是很大的，比如說，當(dāng)你要為第50個網(wǎng)站提供鏈接的時候，你需要在前49個網(wǎng)站里都手動加上第50個網(wǎng)站的友情鏈接，如果網(wǎng)站的數(shù)量再多一些，那么這個工作量就會呈幾何級增加。

　　其實我們可以通過遠(yuǎn)程讀取TXT文本的辦法，來維護(hù)這些網(wǎng)站上的大量鏈接，這樣就可以節(jié)省很多工作量提高SEO工作的效率，只需要一次性在網(wǎng)站上加入這些代碼，以后就可以通過維護(hù)一個固定的TXT文本來維護(hù)這些網(wǎng)站上的鏈接，瞬間將新網(wǎng)站的鏈接出現(xiàn)在數(shù)十個網(wǎng)站上，如果你的網(wǎng)站特別多，鏈接也特別多，還可以考慮為這些鏈接分組，每一個TXT文本為一組，建議不要超過50個網(wǎng)站。唯一需要注意的就是，這個存放TXT鏈接文本的網(wǎng)址一定要保持穩(wěn)定，空間也要穩(wěn)定，不然會影響所有網(wǎng)站。這里推薦一個穩(wěn)定速度很快的空間，百度搜索“移不動網(wǎng)絡(luò)營銷”，獨立IP空間很適合做SEO。

　　PHP遠(yuǎn)程讀取TXT文本的代碼：

　　< ?PHP

　　$file_name="http://www.***.com/url/1.txt";

　　$i=1;

　　$fp=fopen($file_name,'r');

　　while(!feof($fp))

　　{

　　$buffer=fgets($fp,4096);

　　echo $buffer." ";

　　$i=$i+1;

　　}

　　fclose($fp);

　　? >

　　ASP遠(yuǎn)程讀取TXT文本代碼：

　　< %

　　Function PostHttpPage(loginActUrl,PostData)

　　Dim xmlHttp

　　Dim RetStr

　　Set xmlHttp = CreateObject("Microsoft.XMLHTTP")

　　xmlHttp.Open "POST", loginActUrl, False

　　XmlHTTP.setRequestHeader "Content-Length",Len(PostData)

　　xmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"

　　xmlHttp.Send PostData

　　If Err.Number <> 0 Then

　　Set xmlHttp=Nothing

　　response.Write("err:"&PostData)

　　Exit Function

　　End If

　　PostHttpPage=BytesToBstr(xmlHttp.responseBody,"GB2312")

　　Set xmlHttp = nothing

　　End Function

　　Function BytesToBstr(body,code)

　　dim objstream

　　set objstream = Server.CreateObject("adodb.stream")

　　objstream.Type = 1

　　objstream.Mode =3

　　objstream.Open

　　objstream.Write body

　　objstream.Position = 0

　　objstream.Type = 2

　　objstream.Charset =code

　　BytesToBstr = objstream.ReadText

　　objstream.Close

　　set objstream = nothing

　　End Function

　　% >

　　< %= PostHttpPage("http://www.***.com/url/1.txt","") % >

　　里面的http://www.***.com/url/1.txt修改為你的TXT鏈接文本存放的地址。

　　QQ：543646 (中國移不動) 董敬一個人博客：http://www.djycn.com