📄 photo2.cgi
字号:
#!/usr/bin/perl
#------------------------------------------------------#
# 本程序为Yuzi工作室提供 #
# Yuzi论坛3000(BBS3000)v4.00 #
#------------------------------------------------------#
$cgipa="."; # CGI程序文件的绝对路径
######################
## 以下部分不需修改 ##
######################
require "$cgipa/setup.cgi";
&GetCookies;
if ($ENV{'REQUEST_METHOD'} eq "POST") {
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
}
else {
$buffer = $ENV{'QUERY_STRING'};
}
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value=~s/\.\.//g;
$FORM{$name} = $value;
}
##########
$tttname=$FORM{'tttname'};
$start=$FORM{'start'};
$username=$Cookies{username};
open(PSD,"$filepath/yhzl/$username.cgi");
$line=<PSD>;
chomp($line);
close(PSD);
($rdpassword,$rdname,$rdmail,$rdhome,$rlast,$rdqm,$rdsex,$rdwork,$rdcity,$rdlove,$rfy,$rhf,$tu,$jiao,$iewin,$QQ,$photo,$rating,$level,$levelstar,$lastlytime,$lastlytopic,$realname,$birthday,$shengxiao,$blood,$constellation,$character,$belief,$marital,$education,$college)=split(/\t/,$line);
if($rdpassword ne $Cookies{password}){&errorview("对不起,您的密码错误!");}
open(PSD,">$filepath/yhzl/$username.cgi");
print PSD $rdpassword."\t".$rdname."\t".$rdmail."\t".$rdhome."\t".$rlast."\t".$rdqm."\t".$rdsex."\t".$rdwork."\t".$rdcity."\t".$rdlove."\t".$rfy."\t".$rhf."\t".$tu."\t".$jiao."\t".$ENV{'HTTP_USER_AGENT'}."\t".$QQ."\t".$tttname."\t".$rating."\t".$level."\t".$levelstar."\t".$lastlytime."\t"."$lastlytopic\t".$realname."\t".$birthday."\t".$shengxiao."\t".$blood."\t".$constellation."\t".$character."\t".$belief."\t".$marital."\t".$education."\t".$college;
close(PSD);
&css;
if($start eq "1"){print "<META HTTP-EQUIV=Refresh CONTENT=0;url=photo.cgi>";}
if($start eq "2"){print "<META HTTP-EQUIV=Refresh CONTENT=0;url=portrait.cgi>";}
print <<"EOM";
<BODY background=$imagurl/bg.gif><br><br><br><br><center><table border="0" cellpadding="0" cellspacing="0" width="378">
<tr><td align="center"><span class="p9"><span class="p12"><font color="#6666FF"><b>关于上传图片需注意的问题</b></font></span></span>
<hr noshade size="1" width="500">
<form method="POST"><input type="hidden" name=tttname value=$username>
<input type="hidden" name=start value=$FORM{'laiyuan'}>
<p align="left">
一、用户不得上传任何有争议的图标或图片,其中包括。<br>
二、我们鼓励用户上传自己的照片或有特色的原创作品。<br>
三、用户请对自己的行为负责,$zyname对由用户引发的各种争议将不承担任何法律责任。<br>
如果您已经都明白了,请按 <input type="submit" name="Submit" value="下一步"></form>
EOM
exit;
######################### END OF SCRIPT #########################
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -