quote.cgi

BBS3000 sourceCode

<td bgcolor=#FFF5E1 align="left" width="280">主页地址：
<input type="text" name="home" size="23" value="http://" maxlength="40">
</td>
</tr>
<tr>
<td bgcolor=#FFF5E1 align="left" width="543" colspan="2">回复标题：
<input type="text" name="retitles" size="68" value=Re:$titles maxlength="50">
<input type="hidden" name="id" value="$id">
<input type="hidden" name="yjhf" value="$yjhf">
</td>
<tr bgcolor="#ffedc8">
<td background=$imagurl/tablebg.gif height="168" colspan="2" width="545">
<p><center>文章内容</center><textarea name=comment cols=75 rows=9>[QUOTE]原文由 $rusername 发表:
[B]
$nr
[/B][/QUOTE]</textarea></p>
</td>
</tr>
</table>  </center>
</div>
<div align="center">
<input type="image" border="0" name="imageField" src="$imagurl/sbutton-send2.gif" alt="发 送">
<a href="$bbs?id=$id"><img src="$imagurl/sbutton-cal2.gif" border="0" alt="取 消"></div></a>
</center></center>
</td>
<td bgcolor=#7AB7FA><table width=150 border=0 cellpadding=4 cellspacing=0><tr bgcolor=#EEDEAC align=center><td bgcolor=#7AB7FA>请选择您的表情</td></tr><tr bgcolor=#7AB7FA><td><table width=100% border=0><tr><td align=center><input type=radio name=emote value=1><img onclick=inputs('[img]$imagurl/1.gif[/img]') src=$imagurl/1.gif alt=随便说说啦></td><td align=center><input type=radio name=emote value=2 ><img onclick=inputs('[img]$imagurl/2.gif[/img]') src=$imagurl/2.gif></td><td align=center><input type=radio name=emote value=21 ><img onclick=inputs('[img]$imagurl/21.gif[/img]') src=$imagurl/21.gif></td></tr><tr><td align=center><input type=radio name=emote checked value=3><img onclick=inputs('[img]$imagurl/3.gif[/img]') src=$imagurl/3.gif alt=我来回答你></td><td align=center><input type=radio name=emote value=4><img onclick=inputs('[img]$imagurl/4.gif[/img]') src=$imagurl/4.gif></td><td align=center><input type=radio name=emote value=22 ><img onclick=inputs('[img]$imagurl/22.gif[/img]') src=$imagurl/22.gif></td></tr><tr><td align=center><input type=radio name=emote value=5><img onclick=inputs('[img]$imagurl/5.gif[/img]') src=$imagurl/5.gif alt=坚决同意！></td><td align=center><input type=radio name=emote value=6><img onclick=inputs('[img]$imagurl/6.gif[/img]') src=$imagurl/6.gif></td><td align=center><input type=radio name=emote value=23 ><img onclick=inputs('[img]$imagurl/23.gif[/img]') src=$imagurl/23.gif></td></tr><tr><td align=center><input type=radio name=emote value=7><img onclick=inputs('[img]$imagurl/7.gif[/img]') src=$imagurl/7.gif alt=反对反对！></td><td align=center><input type=radio name=emote value=8><img onclick=inputs('[img]$imagurl/8.gif[/img]') src=$imagurl/8.gif></td><td align=center><input type=radio name=emote value=24><img onclick=inputs('[img]$imagurl/24.gif[/img]') src=$imagurl/24.gif></td></tr><tr><td align=center><input type=radio name=emote value=9><img onclick=inputs('[img]$imagurl/9.gif[/img]') src=$imagurl/9.gif alt=大家过来..></td><td align=center><input type=radio name=emote value=10><img onclick=inputs('[img]$imagurl/10.gif[/img]') src=$imagurl/10.gif></td><td align=center><input type=radio name=emote value=25><img onclick=inputs('[img]$imagurl/25.gif[/img]') src=$imagurl/25.gif></td></tr><tr> <td align=center><input type=radio name=emote value=11><img onclick=inputs('[img]$imagurl/11.gif[/img]') src=$imagurl/11.gif alt=好奇怪哟！></td><td align=center><input type=radio name=emote value=12><img onclick=inputs('[img]$imagurl/12.gif[/img]') src=$imagurl/12.gif></td><td align=center><input type=radio name=emote value=26><img onclick=inputs('[img]$imagurl/26.gif[/img]') src=$imagurl/26.gif></td></tr><tr><td align=center><input type=radio name=emote value=13><img onclick=inputs('[img]$imagurl/13.gif[/img]') src=$imagurl/13.gif alt=哇，原来如此></td><td align=center><input type=radio name=emote value=14><img onclick=inputs('[img]$imagurl/14.gif[/img]') src=$imagurl/14.gif></td><td align=center><input type=radio name=emote value=27><img onclick=inputs('[img]$imagurl/27.gif[/img]') src=$imagurl/27.gif></td></tr><tr><td align=center><input type=radio name=emote value=15><img onclick=inputs('[img]$imagurl/15.gif[/img]') src=$imagurl/15.gif alt=管它呢:--{></td><td align=center><input type=radio name=emote value=16><img onclick=inputs('[img]$imagurl/16.gif[/img]') src=$imagurl/16.gif></td><td align=center><input type=radio name=emote value=28><img onclick=inputs('[img]$imagurl/28.gif[/img]') src=$imagurl/28.gif></td></tr><tr> <td align=center><input type=radio name=emote value=17><img onclick=inputs('[img]$imagurl/17.gif[/img]') src=$imagurl/17.gif alt=号外！号外！></td><td align=center><input type=radio name=emote value=18><img onclick=inputs('[img]$imagurl/18.gif[/img]') src=$imagurl/18.gif></td><td align=center><input type=radio name=emote value=29><img onclick=inputs('[img]$imagurl/29.gif[/img]') src=$imagurl/29.gif></td></tr><tr> <td align=center><input type=radio name=emote value=19><img onclick=inputs('[img]$imagurl/19.gif[/img]') src=$imagurl/19.gif alt=大家小心！></td>
<td align=center><input type=radio name=emote value=20><img onclick=inputs('[img]$imagurl/20.gif[/img]') src=$imagurl/20.gif></td><td align=center><input type=radio name=emote value=30 ><img onclick=inputs('[img]$imagurl/30.gif[/img]') src=$imagurl/30.gif></td></tr></table></td></tr></table></td></tr></table></div></td></tr>
<tr bgcolor=#7AB7FA>
<td bgcolor=#FFFFFF>
<input type="checkbox" value="1" name="emailhf"> 将本文章寄一份给原作者　　
EOF
if ($YBBCodeAllow eq "is") {
print <<EOF;
<font color=#FF0000>* </font><a href=$imagurl/ybbcode.htm target=_blank>YBB代码</a>支持
EOF
}
print <<EOF;
</td>
</tr>
</table>
</form>
</body>
</html>
EOF
exit;

sub copy{
&send_html;
print <<EOF;
<HTML><HEAD><TITLE>复制主题 - YuziBBS3000</TITLE>
<LINK href="$imagurl/bbs.css" type=text/css rel=stylesheet>
<META http-equiv=Content-Type content="text/html; charset=gb2312"></HEAD>
<BODY bgColor=#ffffff>
<CENTER>
<TABLE width="95%" border=0>
  <TBODY>
  <TR>
    <TD><A href="list.cgi"><IMG
      style="BORDER-LEFT-COLOR: #000000; BORDER-BOTTOM-COLOR: #000000; BORDER-TOP-COLOR: #000000; BORDER-RIGHT-COLOR: #000000"
      BORDER=0 src="$imagurl/bbtitle5.gif"></A></TD>
    <TD vAlign=center>
      <P><B>论坛: <FONT color=#2f2f4f>$bbsname</FONT><BR>话题: <FONT
      color=#2f2f4f>$titles</FONT></B></P></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="90%" border=0>
  <TBODY>
  <TR>
    <TD bgColor=#000000>
      <TABLE cellSpacing=1 cellPadding=4 width="100%" border=0>
        <TBODY>
        <TR bgColor=#00aaaa>
          <TD><FONT color=#ffffff><B>怎样复制</B></FONT></TD>
          <TD><FONT
            color=#ffffff><B>您可使用"选择全部"按钮或用鼠标/键盘手动选择贴子内容，然后使用Ctrl+C或Apple+C复制选择内容</B></FONT></TD></TR>
        <TR bgColor=#dedfdf>
          <TD><B>复制内容</B></TD>
          <TD>
            <FORM><INPUT class=buttonface onclick=javascript:this.form.CopyMessage.focus();this.form.CopyMessage.select(); type=button value=选择全部><BR><TEXTAREA name=CopyMessage rows=18 wrap=VIRTUAL cols=80>$nr</TEXTAREA></FORM></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></CENTER>
<center><p><a href=javascript:window.history.back();><IMG src=$imagurl/back.gif border=0></a></p>

<div align=center>
<table border=0 cellSpacing=4 width=545>
<tbody>
<tr align=middle>
<td class=unnamed1 width=533>本论坛言论纯属发表者个人意见，与<font color=#ff6633><b>
<font face=Arial, Helvetica, sans-serif>$zyname</font></b></font>
立场无关</td>
</tr>
<tr align=middle>
<td class=unnamed1 width=533>免费论坛服务由<font color=#cc0033>
</font><font color=#ff6633><b><font Helvetica, sans-serif><a href=$zyurl target=_blank>$zyname</a></font></b></font><font color=#cc0033>
</font>提供 技术支持：<b><a href=http://www.yuzi.net target=_blank>Yuzi工作室</a></b></td>
</tr>
</tbody>
</table>
</html>
EOF
exit;
}
sub mail{
if($username ne ""){
open(PSD,"$filepath/yhzl/$username.cgi");
@lines=<PSD>;
close(PSD);
foreach $line (@lines) {
($rdpassword,$rdnamee,$rdmail)=split(/\t/,$line);
}
}
if ($mail eq "") {
&send_html;
print <<EOF;
<HTML><HEAD>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<STYLE type=text/css>BODY {
	FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
TD {
	FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
</STYLE>
</HEAD>
<BODY bgColor=#f0f8ff>
<DIV align=center><BR><BR>
<TABLE bgColor=#a2c8f2 border=0 cellPadding=3 cellSpacing=3 width=300>
  <TBODY>
  <TR align=middle>
    <TD>请 输 入 E-mail </TD></TR></TBODY></TABLE>
<FORM action=quote.cgi method=post>
<INPUT TYPE="HIDDEN" NAME="id" VALUE="$id">
<INPUT TYPE="HIDDEN" NAME="menu" VALUE="mail">
<INPUT TYPE="HIDDEN" NAME="replytime" VALUE="$replytime">
<INPUT TYPE="HIDDEN" NAME="fff" VALUE="$fff">
如果要输入多个，请用“,”格开。<BR><BR><BR>
<INPUT name=mail size=30 VALUE=$rdmail> <BR><BR><INPUT border=0 src="$imagurl/sbutton-send2.gif" type=image>
<A href="javascript:window.history.back()"><IMG border=0 src="$imagurl/sbutton-cal2.gif" ></A> <BR><BR></FORM></DIV></BODY></HTML>
EOF
}else{
if(!($mail=~ /.*\@.*\..*/)){&errorview("您的Email输入错误！");exit(0);}
open (OUTMAIL,"| $mailprg") || die "Mail system error";
print OUTMAIL "To: $mail\n";
print OUTMAIL "Subject: $titles\n";
print OUTMAIL "发信人：$rusername　讨论区：$bbsname\n";
print OUTMAIL "标  题：$titles\n\n";
print OUTMAIL "$nr\n\n";
print OUTMAIL "免费论坛服务由 $zyname($zyurl) 提供　程序制作：Yuzi工作室(http://www.yuzi.net)\n";
print OUTMAIL "\n\n";
close(OUTMAIL);
&errorview("您的邮件已经送出!");exit;
}
exit;
}
sub lock{
if($userpsd eq ""){&errorview("对不起，您不是版主！");exit;}
if(($userpsd ne "$delpsd")&&($userpsd ne $fbzdel)){&errorview("对不起，您不是版主！");exit;}
if ( -X "$filepath/list/$id/$replytime"){
chmod(0666,"$filepath/list/$id/$replytime");
&errorview("主题已经开放，可以自由回复了！");exit;
}else{
chmod(0777,"$filepath/list/$id/$replytime");
&errorview("主题已经关闭，不再接受新的回复！");exit;
}
}
sub jing{
if($userpsd eq ""){&errorview("对不起，您不是版主！");exit;}
if(($userpsd ne "$delpsd")&&($userpsd ne $fbzdel)){&errorview("对不起，您不是版主！");exit;}
if ( -X "$filepath/list/$id/$replytime"."b"){
chmod(0666,"$filepath/list/$id/$replytime"."b");
&errorview("主题已经精华区中移出了！");exit;
}else{
chmod(0777,"$filepath/list/$id/$replytime"."b");
&errorview("主题已经添加到精华区了！");exit;
}
}
######################### END OF SCRIPT #########################