viewjh.cgi

--黑客防线-精华奉献本(攻册)

#------------------------------------------------------#
#　　　　　　　　　本程序为Yuzi工作室提供　  　　　　　#
#　　　　　　　　Yuzi论坛3000(BBS3000)v4.00　　　　　　#
######################---------------------------------#
## 以下部分不需修改 ##
######################
open (FILE,"$filepath/data/people.cgi");
@LINES=<FILE>;
close(FILE);
$people=@LINES;
open(TITLES,"$filepath/list/$id/good");
@hastitles=<TITLES>;
close(TITLES);
$size=@hastitles;
$syy=$page-20;
&css;
print <<EOF;
<SCRIPT>if(top==self)document.location='$cgiurl?id=$id';</SCRIPT>
<style>TABLE{BORDER-TOP:0px;BORDER-LEFT:0px;BORDER-BOTTOM:1px}TD{BORDER-RIGHT:0px;BORDER-TOP:0px}</style>
<title>$bbsname（BBS 风格）</title>$htmlt<table background=$imagurl/color/$color/iebg.gif width=100% border=0 cellpadding=4 cellspacing=0 bgcolor=$bgcolor0><tr><td><font color=ffffff>论坛名称：<a href=$cgiurl?menu=listtitle&id=$id><font color=ffffff>$bbsname</font></a>　　版主：<a href=yhreg.cgi?menu=viewuser&username=$bzmc><font color=ffffff>$bzmc</font></a> <a href=yhreg.cgi?menu=viewuser&username=$fbzmc><font color=ffffff>$fbzmc</font></a> <a href=yhreg.cgi?menu=viewuser&username=$fbzmc2><font color=ffffff>$fbzmc2</font></a></td><td align=right><a href=$outurl target=_blank><font color=ffffff>$outurl</font></a></td></tr></table><br><table border=0 cellPadding=0 cellSpacing=0 width=100%><tr>
<td>&nbsp;<a href=$cgiurl?menu=newtopic&id=$id><img src=$imagurl/color/$color/sbutton-post2.gif border=0 alt=发表文章></a> <a href=vote.cgi?id=$id><img src=$imagurl/color/$color/poll.gif border=0 alt=添加议题></a></td><td align=right><font color=red>>><a href=reg.cgi target=_blank>免费论坛申请</a>>><a href=xiu.cgi?id=$id target=_blank>版主资料修改</a>>><a href=yhreg.cgi target=_blank>用户资料注册</a>>><a href=yhxiu.cgi target=_blank>用户资料修改</a>>><a href=JavaScript:hao('friend.cgi')>网络寻呼机</a>>><a href=$cgiurl?menu=viewjh&id=$id>精华区</font></a><br><img src=$imagurl/refurbish.gif><a href=javascript:location.reload()>刷新当前论坛</a> 
<img src=$imagurl/myword.gif><a href=JavaScript:New('guest.cgi')>我的留言簿</a> <img src=$imagurl/how.gif><a href=yhreg.cgi?menu=online>在线人数: <font color=red>$people</font></a> <img src=$imagurl/101.gif>论题数: <font color=red>$size</font> <img src=$imagurl/helpxp.gif><a style=cursor:help href=$imagurl/help.htm target=_blank>使用帮助</a></td></tr></table>
<table width=100% cellspacing=0 bgcolor=$bgcolor>
<tr align=center><td width=4% bgcolor=$bgcolor0 height=20>　</td>
<td width=3% bgcolor=$bgcolor0>　</td>
<td width=40% bgcolor=$bgcolor0><font color=$bgcolor4>文章标题</font></td>
<td width=7% bgcolor=$bgcolor0><font color=$bgcolor4>字[回]</font></td>
<td width=10% bgcolor=$bgcolor0><font color=$bgcolor4>作者</font></td>
<td width=20% bgcolor=$bgcolor0><font color=$bgcolor4>最后更新时间</font></td>
<td width=10% bgcolor=$bgcolor0><font color=$bgcolor4>最后回复</font></td>
<td width=6% bgcolor=$bgcolor0><font color=$bgcolor4>点击</font></td></tr></table>
EOF
for ($i=$page; $i<$page+20; $i++){
$hastitle=@hastitles[$i];
($index)=split(/\t/,$hastitle);
chomp($index);
open(TITLES,"$filepath/list/$id/$index");
$hastitle=<TITLES>;
close(TITLES);
($rtitles,$rthistime,$rusername,$rcomment,$rfrom,$rhasreply,$emote,$lastname,$rlasttime,$re,$rhassee,$jing,$lock)=split(/\t/,$hastitle);
$ii=1;
if($rhasreply>15){
$ii=$rhasreply/15;
($ii,$spage)=split(/\./,$ii);
if($spage){$ii++;}
}
if (length($rtitles) > 40) {$rtitles = substr($rtitles,0,40);$rtitles.="\...";}
if($rhasreply<1){$hot="closedb.gif";}
elsif($rhasreply<15){$hot="closed.gif";}
elsif($rhasreply>=15){$hot="hot.gif";}
if($lock eq "1"){$hot="lock.gif";}
if($rhasreply eq 0){$rhasreply=length($rcomment);}else{$sn=$rhasreply;$rhasreply="<font color=FF0000>[$rhasreply]</font>";}
if($lastname ne "--"){$lastname="<a onclick=min_yuzi() target=message href=yhreg.cgi?menu=viewuser&username=$lastname>$lastname</a>";}
if($jing && $rtitles){
print <<EOF;
<table width=100% cellspacing=0 border=1 bordercolor=$bgcolor><tr align=center><td width=4% bgcolor=$bgcolor2><img src=$imagurl/$hot></td>
<td bgcolor=$bgcolor1 width=3%><img src=$imagurl/jh.gif></td>
<td bgcolor=$bgcolor2 align=left width=40% onMouseOver=this.style.backgroundColor='$bgcolor1' onMouseOut=this.style.backgroundColor=''><a href=JavaScript:New('$cgiurl?menu=show&slttitle=$index&id=$id')><img src=$imagurl/$emote.gif border=0 alt=新窗口></a> <a onclick=min_yuzi() target=message href=$cgiurl?menu=show&slttitle=$index&id=$id>$rtitles</a></td>
<td bgcolor=$bgcolor1 width=7%>$rhasreply</td>
<td bgcolor=$bgcolor2 width=10% style=word-break:break-all><a onclick=min_yuzi() target=message href=yhreg.cgi?menu=viewuser&username=$rusername>$rusername</a></td>
<td bgcolor=$bgcolor1 width=20%><a onclick=min_yuzi() target=message href=$cgiurl?menu=show&slttitle=$index&id=$id&page=$ii#end><img src=$imagurl/lastpost.gif border=0 alt=到最新发表的页面上></a> $rlasttime</td>
<td bgcolor=$bgcolor2 width=10% style=word-break:break-all>$lastname</td>
<td bgcolor=$bgcolor2 width=6%>$rhassee</td></tr></table>
EOF
}
}
print <<EOF;
</table><table border="0" width="100%" cellspacing="0" cellpadding="0"><tbody><tr>
<td align=left valign=baseline>所有时间为 北京时间</td><td align=center valign=baseline><img src=$imagurl/win16.gif><a href=bbs.cgi?menu=listtitle&id=$id>BBS 风格</a> <img src=$imagurl/win16.gif><a href=bbs1.cgi?menu=listtitle&id=$id>讨论区风格</a> <img src=$imagurl/win16.gif><a href=bbs2.cgi?id=$id>留言簿风格</a></td>
<td align=right>
EOF
if($syy>-1){
print "<a href=$cgiurl?menu=viewjh&id=$id&page=$syy>";
}
print "<img src=$imagurl/color/$color/sbutton-backpage.gif border=0></a>";
if(($size>20)&&($i<$size)){
print "<a href=$cgiurl?menu=viewjh&id=$id&page=$i><img src=$imagurl/color/$color/sbutton-nextpage.gif  border=0></a>";
}else{
print "<img src=$imagurl/color/$color/sbutton-nextpage.gif border=0>";
}
print <<EOF;
<a href=javascript:history.back()><img src=$imagurl/color/$color/sbutton-back.gif  border=0></a></td></tr></table>
<br><center><TABLE cellSpacing=0 cellPadding=0 width=400 bgColor=$bgcolor2 border=0>
<tr><TD vAlign=top><img src=$imagurl/curve_mo.gif></TD><TD colSpan=2 align=center><br></TD><TD vAlign=top width=10><img src=$imagurl/curve_mo1.gif></TD></TR>
<tr><TD></TD><TD align=middle colSpan=2><form method=post><input type=hidden name=menu value=findtitle><input type=hidden name=id value=$id>输入您要搜索的字符 <input type=text name=search> <input name=submit type=submit value=" 搜 索 ">
</TD></form><TD></TD></TR><tr><TD></TD><TD align=middle><form method=post><input type=hidden name=menu value=win>您的姓名 <input name=username size=9 maxlength=20> 您的密码 <input type=password name=userpsd size=9><input type=hidden name=id value=$id> <input name=submit type=submit value=" 登 陆 ">
</TD></form><TD></TD></TR><tr><TD><img src=$imagurl/curve_mo2.gif></TD><TD colSpan=2></TD><TD><img src=$imagurl/curve_mo3.gif></TD></TR></TABLE>
<br>
$htmlw
<hr noShade SIZE=1 width=450>
本论坛言论纯属发表者个人意见，与 <font color=ff6633><b>$zyname</font></b> 立场无关<br>免费论坛服务由 <font color=ff6633><b><a href=$zyurl target=_blank>$zyname</a></b></font> 提供 技术支持：<b><a href=http://www.yuzi.net target=_blank>Yuzi工作室</a></b>
<br>Yuzi Bulletin Board<font style=font-size:7pt><sup><b>TM</b></sup></font> Version $ver
EOF
exit;
######################### END OF SCRIPT #########################