pupil_add.cgi

来自「学生信息系统,这个程序设置非常简单」· CGI 代码 · 共 51 行

$pagetitle="增加学生档案";
&error("您没有执行此操作的权限！") if ($ulevel ne "master");
sub pupil_add {
if (!$fields{'adduid'} || !$fields{'adduname'} || !$fields{'addusex'} || !$fields{'addumon'} || !$fields{'addulevel'}) {
&redirect("$indexurl?job=pupil&page=$fields{'page'}&mon=$fields{'mon'}$userinfo","输入信息不完整！");
} elsif ($fields{'edit'}) {
	if ($uid ne $MasterID && $fields{'addulevel'} eq "master") {
&redirect("$indexurl?job=pupil&page=$fields{'page'}&mon=$fields{'mon'}$userinfo","您没有权限修改用户为系统管理员！");
	}
	elsif (!-e "$userhead$fields{'adduid'}.cgi") {
&redirect("$indexurl?job=pupil&page=$fields{'page'}&mon=$fields{'mon'}$userinfo","指定用户档案不存在！");
	}
	elsif ($fields{'adduid'} eq $MasterID && $uid ne $MasterID) {
&redirect("$indexurl?job=pupil&page=$fields{'page'}&mon=$fields{'mon'}$userinfo","您没有权限修改此用户档案！");
	} else {
	&oinfo($fields{'adduid'});
	if (!$fields{'addupass'}) {
		$newaddpass=$opass;
	} else {
		$newaddpass=crypt($fields{'addupass'},$cword);
		$newaddpass=substr($newaddpass,2,length($newaddpass));
	}
&writeuserfile($fields{'adduid'},"$fields{'adduid'}‖$newaddpass‖$fields{'adduname'}‖$fields{'addusex'}‖$ucontact‖$fields{'addumon'}‖$fields{'addulevel'}‖$ustats‖$fields{'addux1'}‖$fields{'addux2'}‖$fields{'addux3'}‖$fields{'addux4'}‖$fields{'addux5'}‖$fields{'addux6'}‖$ot1‖$ot2‖$ot3‖$ot4‖end\n");
&redirect("$indexurl?job=pupil&page=$fields{'page'}&mon=$fields{'mon'}$userinfo","修改用户档案完成！");
	}
} else {
	if ($uid ne $MasterID && $fields{'addulevel'} eq "master") {
&redirect("$indexurl?job=pupil&page=$fields{'page'}&mon=$fields{'mon'}$userinfo","您没有权限指定用户为系统管理员！");
	} elsif (-e "$userhead$fields{'adduid'}.cgi") {
&redirect("$indexurl?job=pupil&page=$fields{'page'}&mon=$fields{'mon'}$userinfo","指定用户档案已存在！");
	} else {
	$fields{'addupass'}=$fields{'adduid'} if (!$fields{'addupass'});
	$newaddpass=crypt($fields{'addupass'},$cword);
	$newaddpass=substr($newaddpass,2,length($newaddpass));
	my $newdes=&randompass("2");
	$addustats="login_".$statsno."_".$userip."_$newdes";
&put_fvar(">$userhead$fields{'adduid'}.cgi","$fields{'adduid'}‖$newaddpass‖$fields{'adduname'}‖$fields{'addusex'}‖‖$fields{'addumon'}‖$fields{'addulevel'}‖$addustats‖$fields{'addux1'}‖$fields{'addux2'}‖$fields{'addux3'}‖$fields{'addux4'}‖$fields{'addux5'}‖$fields{'addux6'}‖‖‖‖‖end\n");
	if ($fields{'setnext'}) {
	$setnext=int($fields{'adduid'});
	  if ($setnext) {
		$setnext++;
		if (length($setnext)<length($fields{'adduid'})) {
		$setnext="0"x(length($fields{'adduid'})-length($setnext)).$setnext;
		}
	  }
	} else {$setnext="";}
&redirect("$indexurl?job=pupil&page=$fields{'page'}&mon=$fields{'mon'}&next=$setnext$userinfo&temp=#useradd","增加用户档案完成！");
	}
}
}