修改教程http://bbs.powereasy.net/forum67/thread-417745-1-1.aspx
修改步骤
一是把 “修改“'函数名:ManualPagination”中的内容全部替换成6.5的
二是把
strPages = strPages & "<div align='center' id='pagebar'><b>"
If CurrentPage > 1 Then
If UseCreateHTML > 0 And ClassPurview = 0 And rsArticle("InfoPoint") = 0 And rsArticle("InfoPurview") = 0 And strFileName <> "Print.asp" Then
If CurrentPage > 2 Then
If CurrentPage > ShowPageNum And CurrentPage <= totalPage And startFlag > 1 Then
strPages = strPages & "<a href='" & tmpArticleUrl & "_" & startFlag - 1 & FileExt_Item & "'><<</a>"
End If
strPages = strPages & "<a href='" & tmpArticleUrl & "_" & CurrentPage - 1 & FileExt_Item & "'>" & XmlText_Class("ContentPages/PrevPage", "上一页") & "</a>"
Else
strPages = strPages & "<a href='" & tmpArticleUrl & FileExt_Item & "'>" & XmlText_Class("ContentPages/PrevPage", "上一页") & "</a>"
End If
Else
If CurrentPage > ShowPageNum And CurrentPage <= totalPage Then
strPages = strPages & "<a href='" & strFileName & "?ArticleID=" & ArticleID & "&Page=" & startFlag - 1 & "' ><<</a>"
End If
strPages = strPages & "<a href='" & strFileName & "?ArticleID=" & ArticleID & "&Page=" & CurrentPage - 1 & "'>" & XmlText_Class("ContentPages/PrevPage", "上一页") & "</a>"
End If
End If
For i = startFlag To endFlag
If i = CurrentPage Then
strPages = strPages & "<font color='red'><a>" & CStr(i) & "</a></font>"
Else
If UseCreateHTML > 0 And ClassPurview = 0 And rsArticle("InfoPoint") = 0 And rsArticle("InfoPurview") = 0 And strFileName <> "Print.asp" Then
If i > 1 Then
strPages = strPages & "<a href='" & tmpArticleUrl & "_" & i & FileExt_Item & "'>" & i & "</a>"
Else
strPages = strPages & "<a href='" & tmpArticleUrl & FileExt_Item & "'>" & i & "</a>"
End If
Else
strPages = strPages & "<a href='" & strFileName & "?ArticleID=" & ArticleID & "&Page=" & i & "'>" & i & "</a>"
End If
End If
Next
If endFlag < totalPage Then
strPages = strPages & " ... "
End If
If CurrentPage < totalPage Then
If UseCreateHTML > 0 And ClassPurview = 0 And rsArticle("InfoPoint") = 0 And rsArticle("InfoPurview") = 0 And strFileName <> "Print.asp" Then
strPages = strPages & "<a href='" & tmpArticleUrl & "_" & CurrentPage + 1 & FileExt_Item & "'>" & XmlText_Class("ContentPages/NextPage", "下一页") & "</a> "
If totalPage > ShowPageNum And endFlag < totalPage Then
strPages = strPages & "<a href='" & tmpArticleUrl & "_" & endFlag + 1 & FileExt_Item & "'>>></a>"
End If
Else
strPages = strPages & "<a href='" & strFileName & "?ArticleID=" & ArticleID & "&Page=" & CurrentPage + 1 & "'>" & XmlText_Class("ContentPages/NextPage", "下一页") & "</a>"
If totalPage > endFlag Then
strPages = strPages & "<a href='" & strFileName & "?ArticleID=" & ArticleID & "&Page=" & endFlag + 1 & "'>>></a>"
End If
End If
End If
strPages = strPages & "</b></div>"
GetContentPages = strPages
End Function
用这个替换源文件strPages = strPages & "<div align='left'><b>"到 strPages = strPages & "</b></div>"
GetContentPagesDiv = strPages
End Function的所有内容
三是在css中写关于“pagebar”的定义
“pagebar”的定义/*文章内容-----分页*/
#pagebar { text-align:center; TEXT-DECORATION: none; width:570px; height:32px; font-size:12px; }
#pagebar a,#pagebar .page_now { display:block; margin-right:4px; padding:2px 5px; border:1px solid #1AAC2F; color:#fff; font-weight:800; background:url(/images/page.png) repeat-x 0 0 ;}
#pagebar a { display:inline;}
#pagebar A:visited {background-position:0 -30px; border:1px solid #F30; TEXT-DECORATION: none
}
#pagebar A:link {
color:#FFF; border:1px solid #F30; background-position:0 -30px; TEXT-DECORATION: none
}
#pagebar A:active {
color:#1AAC2F; border:1px solid #1AAC2F; background-position:0 -30px; TEXT-DECORATION: none
}
#pagebar a:hover {border:1px solid #1AAC2F; color:#F30; background-position:0 -30px;}
#pagebar .page_now { border:1px solid #F30; background-image:none; background:#666;}
下载修改码地址http://bbs.powereasy.net/handler/down.aspx?action=attach&id=76297