国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

bbs的樹狀算法的補充程序

2019-11-18 20:49:27
字體：大 中 小
來源：轉載
供稿：網友
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


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 惠安县| 确山县| 苍溪县| 和平区| 雷波县| 乌兰县| 永定县| 平武县| 南城县| 商河县| 永年县| 墨江| 昔阳县| 化隆| 白朗县| 吴川市| 滨海县| 桐庐县| 越西县| 崇明县| 永仁县| 镇赉县| 晴隆县| 永和县| 和田市| 尚志市| 武汉市| 开阳县| 习水县| 乐东| 五常市| 肥城市| 天峨县| 德格县| 洱源县| 平原县| 临沭县| 湖州市| 博乐市| 宁陵县| 饶阳县|