|
主题:求教一个关于分页数字标颜色的问题 [收藏主题] | 转到: |
以下是引用archer100在2006-9-9 15:37:22的发言: 就是这些1317行左右 作 用:刷新图片内容页 1679行左右 作 用:刷新下载内容页面 289行左右 作 用:刷新文章内容页面 453行左右 作 用:刷新专题页面 文章分页改: If CurrPage = N Then ArticlePageStr = ArticlePageStr & "<font color=red>[" & N & "]</font> " Else ArticlePageStr = ArticlePageStr & "<a href=" & FolderPath & RefreshRS("Fname") & ">[" & N & "]</a> " End If Else If CurrPage = N Then ArticlePageStr = ArticlePageStr & "<font color=red>[" & N & "]</font> " Else ArticlePageStr = ArticlePageStr & "<a href=" & FolderPath & Fname & "_" & N & FExt & ">[" & N & "]</a> " End If End If |
|
支持(0) | 反对(0) 顶端 底部 |
支持(0) | 反对(0) 顶端 底部 |
<上一主题 | 下一主题 > |