18 12
发新话题
打印

关于Tags排序和美化TagsCloud模块

本主题由 Zx.MYS 于 2007-11-1 18:01 移动

回复 12# 的帖子

迷糊,也就是tags.asp用不上order排序?

我的帖子在这里,只是想美化,却想尽办法都无效。http://bbs.z-blog.net/viewthread.php?tid=17685&highlight=

TOP

回复 13# 的帖子

我看了你的帖子,使tag每列左对齐“janrn”已经解决之,关于按order排序我是这样做的(当然了,方法比较笨):
        For i=0 To l
                Flag = False
                For j = l - 1  To i step -1
                        If IsObject(Tags_Order(j)) and IsObject(Tags_Order(j + 1)) Then
                                If  Tags_Order(j).Order > Tags_Order(j + 1).Order Then
                                        set Array_Temp(0) = Tags_Order(j + 1)
                                        set Tags_Order(j + 1) = Tags_Order(j)
                                        set Tags_Order(j) = Array_Temp(0)
                                        Flag = True
                                End If
                        End If
                Next
                If not Flag Then
                        Exit For
                End If
        Next
这个在本帖的附件里面有。
http://blog.trailerbase.com/

TOP

嘿嘿,说实话,我不大喜欢这个功能,感觉和10楼的说的一样
整齐排列就行了,这样的功能,说花也说不让,感觉更乱,呵呵

TOP

回复 14# 的帖子

这样子会不会比较消耗?

TOP

好文!!
没有.组织
meiyou.org

TOP

说得太深奥了 看不懂

TOP

 18 12
发新话题