📄 tree.html
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<HTML>
<HEAD>
<TITLE>bigmole</TITLE>
<link rel="STYLESHEET" type="text/css" href="webboard.css">
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<script language="JavaScript" type="text/JavaScript">
var spfunc1,spfunc2,spfunc3;
var spDatadso,spFuncdso,spInfodso;
var funLibs,flv,bbsid,curxfile;
var createfunc;
function isOvertsfdata(str){
var strHtml,s1,s2,fl,xnode;
spDatadso.async = false;
spDatadso.src= str;
var l=spDatadso.recordset.RecordCount;
curxfile=str.split("/")[2] //写死，要我的规则
strHtml="<nobr><div>";
var $oldlevel = 0;//不好意思，直接引用perl变量，懒得改了
var $level,$id,$subject,$from,$email,$date,$txt,$lvl,$action;
function maketree(x){ //private method
x=x.firstChild
while (x.nextSibling!=null){//为了实现发贴顺序
x=x.nextSibling;
s2=x.firstChild.text;
dmaketree();
if(x.childNodes.length>1){
maketree(x);} }
}
function dmaketree(){
s1=s2.split("|:|");
//"0|:|"& name & "|:|"& email & "|:|" & subject &"|:|"& now &"|:|"& uid foreach $line (@database) {
$level=s1[0];
$id=s1[5];
$subject=s1[3];
$from=s1[1];
$email=s1[2];
$date=s1[4];
$txt=""
if( $level==0){fl= $id;}
if ($id !='') {
if ($level < $oldlevel) {
$lvl = $oldlevel - $level;
while ($lvl > 0) {
strHtml=strHtml+"</div>";
$lvl--;
}
}
if ($level <= $oldlevel) { strHtml=strHtml+"</div>"; }
$oldlevel = $level;
if ($action == 'admintree') { strHtml=strHtml+'<div class="item" date="$sent"><span class="plus"></span><input type="Checkbox"><a href="?action=preview&group=$group&id=$id" email="$email"><span class="subject"><img class="icon" src="images/message2.gif" align="absmiddle">$subject</span><span class="name">$from</span><span class="date">$date</span></a><br>'; }
else { strHtml=strHtml+'<div class="item" date="'+ $date +'"><span class="plus"></span><a href="#" id="'+$id +'" onclick=msgshow("'+ fl +'","'+ $id+'","'+$level +'") email="'+$email+'"><span class="subject"><img class="icon" src="images/message2.gif" align="absmiddle">'+$subject+'</span><span class="name">'+ $from +'</span><span class="date">'+$date+'</span></a><br>'; }
}
}
strnext='<div align=center><br>'
if (spDatadso.recordset.Fields("id")!="nextnode"){
strnext=strnext + "<font color=blue style='cursor:hand' onclick=isOvertsfdata('data/"+document.body.group +"/"+ spDatadso.recordset.Fields("id")+".xml')>读前300个帖</font>"
}
if (spDatadso.recordset.Fields(0)!=""){
strnext=strnext +" <font color=blue style='cursor:hand' onclick=isOvertsfdata('data/"+document.body.group +"/"+ spDatadso.recordset.Fields(0)+".xml')>读后300个帖</font>"
}
strnext=strnext +'</div>';
for(i=1;i<l;i++){//第一个字段是分页标志,i=1
spDatadso.recordset.MoveNext();
xnode=spDatadso.childNodes(1).childNodes(i);
s2=xnode.firstChild.text;
dmaketree();//楼主的帖子
maketree(xnode);
}
while ($oldlevel > -1) {
strHtml=strHtml+"</div>";
$oldlevel--;
}
//strHtml='<div class="item" date="932358924"><span class="plus"></span><a href="?action=preview&id=299&group=data/group1" email=""><span class="subject"><img class="icon" src="images/message2.gif" align="absmiddle">'+ +'</span><span class="name">kk</span><span class="date">July 19, 1999</span></a><br>'
document.all("messageTree").innerHTML=strHtml +strnext + "</nobr>";
initMessageTreePrime();
}
function msgshow(fl,id,lv){
spInfodso.async = false;
spInfodso.src= "data/"+document.body.group +"/"+fl +".xml" ;
parent.messageframe.contentArea.document.body.innerHTML=spInfodso.selectSingleNode("data/" + id ).text;
parent.messageframe.document.all("id").value=fl;
parent.messageframe.document.all("group").value=document.body.group;flv=lv;bbsid=id;
}
</script>
<SCRIPT LANGUAGE=vbs>
<!--
function getxml()
set objXML = CreateObject("MsXml2.DOMDocument")
end function
//-->
</SCRIPT>
<script type="text/javascript" src="js/webboard.js"></script>
</HEAD>
<!--//获得最新技术和动态请访问http://bigmole.5188.org 请保留此行以便以后获得更多信息-->
<BODY scroll="no" onselectstart="return false" class="messageTreeBody" group="">
<xml src="#" id="dataXML" name="dataXML" async="false"></xml><xml src="#" id="functionXML" name="functionXML" async="false"></xml><xml src="#" id="clientXML" name="clientXML" async="false"></xml>
<table class="headerTable" cellspacing="1" cellpadding="0" id="messageHeader"> <tr>
<td id="subjectHeader" onclick="sortBy('subject')">主 题</td>
<td id="fromHeader" onclick="sortBy('from')">楼 主</td>
<td id="sentHeader" onclick="sortBy('sent')">发件时间<span class="arrow" id="startArrow">5</span></td>
<td> </td>
</tr>
</table>
<div id="scrollDiv">
<script>
initMessageTree();
spDatadso=document.all("dataXML");
spFuncdso=document.all("functionXML");
spInfodso=document.all("clientXML");
</script>
<div class="treeView" id="messageTree">
<nobr>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TR>
<TD rowSpan=4 width="10%"><DIV align=center></DIV></TD>
<TD rowSpan=4 width="80%"><br><br>
<P><font color="#006666">1、大家好，首先欢迎大家使用本地化网络讨论组。<br>
2、本讨论组全部使用XML数据存储。不是存到数据库，是存成纯文件。下载XML和下载htm纯文本文件一样快！
速度就和大型网站生成的静态页面一样快！<br>
3、请不要发表反动文章。<br>
4、希望大家在这里得到提高.<br>
5、不久将把该讨论组优化，公布代码给大家（整个讨论组运行只有一个后台aspx文件，几乎不占任何资源。）
</font></P>
</TD>
</TR>
<TR></TR>
<TR></TR>
<TR vAlign=top></TR>
</TABLE>
</nobr>
</div><div id="movebbs"></div>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -