📄 loadtree1.asp
字号:
<!--#include file=conn.asp-->
<!--#include file=inc/const.asp-->
<html>
<body>
<%Response.Expires=0%>
<%
dim rs
dim sql
dim outtext
outtext=" "
function HTMLEncode(fString)
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "；")
fString = Replace(fString, CHR(10), "，")
HTMLEncode = fString
end function
set rs=server.createobject("adodb.recordset")
sql="select bbs1.*,board.* from bbs1,board where bbs1.boardid="&cstr(request("boardid")&" and bbs1.rootid="&request("rootid")&" and bbs1.announceid<>"&request("rootid")&" and bbs1.boardid=board.boardid and not bbs1.locktopic=2 order by bbs1.rootid desc,bbs1.orders")
' response.write sql
' response.end
rs.open sql,conn,1,1
lockboard=rs("lockboard")
%>
<script>
parent.followTd<%=request("rootid")%>.innerHTML='<TABLE bgColor="<%=Tablebackcolor%>" border=0 cellPadding=0 cellSpacing=0 width="100%" align=center><TBODY><%do while not rs.eof%><TR><TD align=middle bgColor="<%=aTablebodycolor%>" width=32 height=27><font color="<%=TableContentcolor%>"></font></TD><td bgcolor=<%=Tablebackcolor%> valign=middle width=1></td><TD bgcolor="<%=Tablebodycolor%>" width=*><font color=<%=TableContentcolor%>><%for i=2 to rs("layer")%><%=outtext%><%next%><img src="<%=picurl%>nofollow.gif"><a href="dispbbs.asp?boardID=<%=request("boardID")%>&RootID=<%=rs("RootID")%>&ID=<%=rs("announceID")%>&skin=1" title="<%=htmlencode(rs("topic"))%>"><%if rs("topic")="" then
response.write ""&left(htmlencode(rs("body")),22)&"..."
else
if len(rs("topic"))>22 then
response.write ""&htmlencode(left(rs("topic"),22))&"..."
else
response.write htmlencode(rs("topic"))
end if
end if%></font></a> -- <a href="dispuser.asp?name=<%=htmlencode(rs("username"))%>"><%=htmlencode(rs("username"))%></a></font><font color=<%=TableContentcolor%>>(<%=rs("child")%>/<%=rs("hits")%>)</font></tr><%
rs.movenext
loop
rs.close
conn.close
set conn=nothing%></TBODY></TABLE>';
parent.followImg<%=request("rootid")%>.loaded="yes";
</script>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -