【PJ个性使用】将侧栏友情链接横向显示在底部-游戏|阿曼德&心路

Oct

【PJ个性使用】将侧栏友情链接横向显示在底部

发布:懒猫儿 | 分类:游戏 | 评论:0 | 引用:0 | 浏览:

本人不大习惯把友情链接放到侧栏显示，还是习惯于从页面底部寻找友情链接。[face44]本想偷懒直接在论坛找找现成的办法，但都没有找到让我满意的显示方式。于是自己动手，花了些时间调整。我重新整理了一下，放在这里，如果有需要的朋友可以直接套过去用。
方法如下：
1、首先找到 footer.asp 文件。在 footer.asp 文件中，找到

，在其上加入以下代码：

<%
Dim blog_Links1, ImgLink1, TextLink1
Set blog_Links1 = conn.Execute(select * from blog_Links where link_IsShow=true and link_IsMain=true order by link_Order asc)
SQLQueryNums = SQLQueryNums + 1
Do Until blog_Links1.EOF
If Len(blog_Links1(link_Image))>0 Then
        ImgLink1 = ImgLink1&<li class=link style=float:left;width:80px;float:left;overflow:hidden;margin-right:8px;height:24px;line-height:180%><a href=&blog_Links1(link_URL)& target=_blank title=&blog_Links1(link_Name)&>&blog_Links1(link_Name)&</a></li>
Else
        TextLink1 = TextLink1&<li class=link style=float:left;width:80px;float:left;overflow:hidden;margin-right:8px;height:24px;line-height:180%><a href=&blog_Links1(link_URL)& target=_blank title=&blog_Links1(link_Name)&>&blog_Links1(link_Name)&</a></li>
End If
blog_Links1.movenext
Loop
%>

2、然后，在

之下，插入以下代码：

<div style=text-align:left;padding-left:15px;size:12px;><b>友情链接 | <a href=/bloglink.asp>更多链接</a></b></div>
<div class=Content-body><%=ImgLink1%></div>
<div class=Content-body><%=TextLink1%></div>
<div style=height:8px;></div>

最终效果，请看本站首页底部的文字链显示方式。