中国设计联盟
联网
平面设计 画册 VI欣赏 包装 CG-插画 搜索 个人网页 Alexa排名 CSS 建站资源 下载专区 JS特效 品牌服装 服装院校 专题欣赏 SEO 图标欣赏 专题
域名注册 虚拟主机 广州网站设计 域名注册 广州网站建设 上海网站建设 虚拟主机 广州网页设计  虚拟主机 域名注册 acg王国 ACG玩家
求创科技
上海网站建设
中国福网
招聘求职
中国互联
中国设计秀
中资源
当前位置:网络学院首页 >> 编程开发 >> asp >> bbs地树状结构算法

bbs地树状结构算法

来源:中国设计秀    作者:    点击:16     加入收藏    发表评论
0
顶一下

数据库设计中order_value是用来排序的,具体实现是

**注意以下的讨论是对一个主题而言,就是对一棵树而言!

如果加一新贴那么 order_value=0
如果跟贴查比父贴 order_value大的order_value
如果有假设为next_value,那么新帖的
order_value为父贴的(order_value+next_value)/2;
如果有那么新帖的order_value为父贴的order_value+1000
也就是说如果对A贴跟贴,如果A为末贴,A的字帖的order_value为order_value(父)+1000,

不是末贴既找出比A大的order_value,新的order_value为两者的一半!

排序实现: order by groupid,order_value desc
**技巧如果想实现层次多一点可以每次加的多一点+100000,那样应该会好一点


***不足之处:
1:使用两个字段排序,速度有点慢
2:使用order_value是一个浮点数,使用float估计不够,还是使用double
3:只能实现理论上的无穷层实际上超过10层使用float有问题,使用double可能没有
4:插入是需要查找下一个order_value

Dim ordervalue, nextvalue As Double
sql = "select gorders where gId=" & gId & " and goders> " & gorders & " order by goders "
rs1.Open sql, conn1, adOpenForwardOnly, adLockOptimistic '查询比父贴大的
order_value
If (rs1.EOF And rs1.BOF) Then
gorders = gorders + 256
gLayer = gLayer + 1
Else
nextvalue = rs1("gorders")
If (nextvalue - gorders) > 1 Then
gorders = Int((gorders + nextvalue) / 2)
gLayer = gLayer
Else
'gorders,glayer跟回帖一样
End If
End If

End Sub

2007-09-18 09:43:00    出处:
热点文章/相关文章
网站地图 | 关于我们 | 联系我们 | 网站建设 | 广告服务 | 版权声明 | 免责声明 | 网站公告 | 友情链接 | 留言 | 旧版入口