用排序串字段实现树状结构（例程：显示贴子内容）- ASP

当前位置: 首页 > 图文教程 > 网络编程 > ASP > 用排序串字段实现树状结构（例程：显示贴子内容）

ASP: ASP字符串大写转换成小写 ASP小写转换成大写 ucase lcase; asp base64加解密函数代码; Discuz!NT 论坛整合ASP程序论坛; discuz 2.0整合asp系统,用户添加函数; P3P 和跨域 (cross-domain) cookie 访问(读取和设置）; 通过asp程序来创建access数据库; 检查access数据库中是否存在某个名字的表的asp代码; asp #include file 与 #include virtual 的区别小结; 一个带采集远程文章内容,保存图片,生成文件等完整的采集功能; asp 横排显示数据; asp base64 utf-8为了兼容asp.net的base64; 两个非常规ASP木马(可躲过扫描); asp DateDiff实现文字在特定时间后消失; ASP所有的Session变量获取实现代码; 关于ASP eof与bof 区别分析; asp ajax注册验证之防止用户名输入空格; asp sqlserver 执行存储过程返回记录集报对象关闭时不允许操作; ASP 获取文件扩展名函数getFileExt(); asp 简单分页代码; asp删除mssql数据库中没有记录的图片代码

No. « ‹ 84 85 86 87 › »

技术文章搜索

关键字

ASP 中的用排序串字段实现树状结构（例程：显示贴子内容）

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 213 ::

收藏到网摘: n/a

用排序串字段实现树状结构（例程：回复表单）用排序串字段实现树状结构（例程：显示树）

程序：disprec.asp
功能：显示贴子具体内容


<%
keyid=request("keyid")
rootid=request("rootid")
pageno=request("pageno")
if rootid=0 then rootid=keyid
set guestconn=Server.CreateObject("ADODB.connection")
guestconn.Open lybstr
set guestrs=server.createobject("ADODB.recordset")
sqlstr="SELECT * FROM guestbook where lybid="&rootid&" or rootid="&rootid
sqlstr=sqlstr&" order by orderstr,lybid desc"
guestrs.open sqlstr,guestconn,1,1
%>
<html>
<head><title>软件使用留言薄</title>
<style TYPE="text/css">

</style>
</head>
<body topmargin=16 background='topbg.gif'>
<form name='index' method='POST' action='index.asp'>
<table width=100% align=center>
  <tr>
   <td align=center style='font-size:16px;background-color:ffffff;color:red' height=35 valign=top>软件使用
留言薄</td>
   <td align=center colspan=2 style='background-color:ffffff' valign='bottom'>相关留言共<font style='font-
size:16px;color:red'><% =guestrs.recordcount %></font>条</td>
   <td style='background-color:ffffff' valign=bottom align=center><a href='index.asp?pageno=<% =pageno %>'>
留言列表</a></td>
   <td style='background-color:ffffff' valign=bottom align=center><a href='revert.asp?type=post'>发贴子
</a></td>
  </tr>
  <tr style="color:red">
   <td align=center class='td1' width=70%>留言标题</td>
   <td align=center width=70 class='td1' nowrap><img src="/upload/tech/20091103/20091103101134_faa9afea49ef2ff029a833cccc778fd0.gif">作  者</td>
   <td align=center width=100 class='td1' nowrap>发表时间</td>
   <td align=center width=60 class='td1' nowrap>贴子字数</td>
   <td align=center width=60 class='td1' nowrap>贴子序号</td>
  </tr>
<% do while not guestrs.eof %>
  <tr>
   <td><% if guestrs("rootid")<>0 then response.write(replace(space(len(guestrs("orderstr")))," ","  ")) %
><% if guestrs("lybid")+1=keyid+1 then
    if guestrs("rootid")=0 then
      rootid=guestrs("lybid")
    else
      rootid=guestrs("rootid")
    end if
    lybid=guestrs("lybid")
    guestitle=guestrs("guestitle")
    guestname=guestrs("guestname")
    guestemail=guestrs("guestemail")
    guestcomm=guestrs("guestcomm")
    putdate=guestrs("putdate")
    puttime=guestrs("puttime")
    emailflag=guestrs("emailflag")
%><% =guestrs("guestitle") %><% else %><a href='disprec.asp?keyid=<% =guestrs("lybid") %>&rootid=<%
=guestrs("ro'

用排序串字段实现树状结构（例程：回复表单）用排序串字段实现树状结构（例程：显示树）

ASP 中的 用排序串字段实现树状结构（例程：显示贴子内容）

评论 (0) All

ASP 中的用排序串字段实现树状结构（例程：显示贴子内容）