地址如下:
http://link.china3e.cn/
大家可以去做一个差不多的系统,可以更好的管理外部友情链接。
如果您已经有类似的,或更好的系统可以发出来分享下
举例调用源址:
http://link.china3e.cn/feed.asp?Url=http://chinaxsjdq.com&Language=0
http://link.china3e.cn/feed.asp?Url=http://hqbamboowood.com&Language=0
http://link.china3e.cn/feed.asp?Url=http://hzdress.com&Language=0
以下是调用代码:
<div style=" width:100%; overflow:hidden;">
<div style=" width:90px; text-align:left; line-height:20px; float:left; overflow:hidden;">友情链接:</div>
<%
Set http=Server.CreateObject("Microsoft.XMLHTTP")
http.Open "GET","http://link.china3e.cn/feed.asp?Url=http://chinaxsjdq.com&Language=0",False
http.send
Set xmlDoc=Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.Async=False
xmlDoc.ValidateOnParse=False
xmlDoc.Load(http.ResponseXML)
Set item=xmlDoc.getElementsByTagName("item")
For i=0 To (item.Length-1)
Set title=item.Item(i).getElementsByTagName("title")
Set link=item.Item(i).getElementsByTagName("link")
%>
<div style=" overflow:hidden;">
<a href="<%=link.Item(0).Text%>" target="_blank"><%=title.Item(0).Text%></a>
</div>
<%
Set title=nothing
Set link=nothing
Next
Set xmlDoc=nothing
Set http=nothing
%>
</div>
大家可以去做一个差不多的系统,可以更好的管理外部友情链接。
如果您已经有类似的,或更好的系统可以发出来分享下
举例调用源址:
http://link.china3e.cn/feed.asp?Url=http://chinaxsjdq.com&Language=0
http://link.china3e.cn/feed.asp?Url=http://hqbamboowood.com&Language=0
http://link.china3e.cn/feed.asp?Url=http://hzdress.com&Language=0
以下是调用代码:
<div style=" width:100%; overflow:hidden;">
<div style=" width:90px; text-align:left; line-height:20px; float:left; overflow:hidden;">友情链接:</div>
<%
Set http=Server.CreateObject("Microsoft.XMLHTTP")
http.Open "GET","http://link.china3e.cn/feed.asp?Url=http://chinaxsjdq.com&Language=0",False
http.send
Set xmlDoc=Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.Async=False
xmlDoc.ValidateOnParse=False
xmlDoc.Load(http.ResponseXML)
Set item=xmlDoc.getElementsByTagName("item")
For i=0 To (item.Length-1)
Set title=item.Item(i).getElementsByTagName("title")
Set link=item.Item(i).getElementsByTagName("link")
%>
<div style=" overflow:hidden;">
<a href="<%=link.Item(0).Text%>" target="_blank"><%=title.Item(0).Text%></a>
</div>
<%
Set title=nothing
Set link=nothing
Next
Set xmlDoc=nothing
Set http=nothing
%>
</div>
目前只知道这个系统方便管理友情链接,至于对SEO有什么好处,我还没有研究过。上面这个系统只是个案例,也有相关差不多的很多。这是一个牛人发明的。现在SEO工具基本上都是自己开发的才是最好的。因为只有SEO自己才知道要什么样的工具,很多SEO公司都是自己开发工具的。像南京科泰等公司。