 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
ssql = "select gorders，glayer from bbs where gId=" & gId & " and goders> " & gorders & " order by goders " rs1.Open sql, conn1, adOpenForwardOnly, adLockOptimistic \\\'查询比父贴 ‘order_value大的order_value If (rs1.EOF And rs1.BOF) Then If gLayer >= 8 Then \\\'假如深度大于8，就设goerders,glayer跟回帖平行 gorders = rs1("gorders") gLayer = rs1("glayer") Else gorders = gorders + 256 gLayer = gLayer + 1 End If Else nextvalue = rs1("gorders") If (nextvalue - gorders) > 1 Then gorders = Int((gorders + nextvalue) / 2) gLayer = gLayer Else \\\'跟跟贴平行 gorders = rs1("gorders") gLayer = rs1("glayer") End If End If 返回类别: 教程 上一教程: 数据分页方式新思路，速度异常快 下一教程: 用排序串字段实现树状结构(库结构) 您可以阅读与"BBS的树状算法的补充程序"相关的教程: · BBS的树状结构算法 · MD5不可逆加密算法的ASP实现实例 · 身份证校验算法与ASP程序 · 关于#INCLUDE的补充说明 · ASP做象资源治理器的树形目录 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
