schomana_edit.cgi

非常优秀的一套办公系统

$pagetitle="学生成绩修改";
&error("您没有执行此操作的权限！") if ($ulevel ne "master");
sub schomana_edit {
if (!$fields{'user'} || !$fields{'class'}) {
&redirect("$indexurl?job=schomana&DB=$DBname&mon=$fields{'mon'}&page=$fields{'page'}&user=$fields{'user'}$userinfo&temp=#lookuser","没有发现指定用户数据！");
} else {
	if ($fields{'auto'}) {
	  $fields{'cg28'}=0;
	  for ($i=1;$i<=21;$i++) {
	    $cgfrom="cg$i";
	    $fields{'cg28'}+=int($fields{$cgfrom});
	  }
	}
	$setedit=0;
	open (DAT, "+<$datahead$DBname.cgi");
	flock(DAT,2) if ($OS);
	my @dbinfo=<DAT>;
	seek(DAT,0,0);
	foreach (@dbinfo){
($mustid,$mustclass,$ocg1,$ocg2,$ocg3,$ocg4,$ocg5,$ocg6,$ocg7,$ocg8,$ocg9,$ocg10,$ocg11,$ocg12,$ocg13,$ocg14,$ocg15,$ocg16,$ocg17,$ocg18,$ocg19,$ocg20,$ocg21,$ocg22,$ocg23,$ocg24,$ocg25,$ocg26,$ocg27,$ocg28,$last) =split(/\‖/,$_);
	  if ($mustid eq $fields{'user'}) {
print DAT "$fields{'user'}‖$fields{'class'}‖$fields{'cg1'}‖$fields{'cg2'}‖$fields{'cg3'}‖$fields{'cg4'}‖$fields{'cg5'}‖$fields{'cg6'}‖$fields{'cg7'}‖$fields{'cg8'}‖$fields{'cg9'}‖$fields{'cg10'}‖$fields{'cg11'}‖$fields{'cg12'}‖$fields{'cg13'}‖$fields{'cg14'}‖$fields{'cg15'}‖$fields{'cg16'}‖$fields{'cg17'}‖$fields{'cg18'}‖$fields{'cg19'}‖$fields{'cg20'}‖$fields{'cg21'}‖$fields{'cg22'}‖$fields{'cg23'}‖$fields{'cg24'}‖$fields{'cg25'}‖$fields{'cg26'}‖$fields{'cg27'}‖$fields{'cg28'}‖end\n";
$setedit=1;
	  } else {print DAT $_;}
	}
print DAT "$fields{'user'}‖$fields{'class'}‖$fields{'cg1'}‖$fields{'cg2'}‖$fields{'cg3'}‖$fields{'cg4'}‖$fields{'cg5'}‖$fields{'cg6'}‖$fields{'cg7'}‖$fields{'cg8'}‖$fields{'cg9'}‖$fields{'cg10'}‖$fields{'cg11'}‖$fields{'cg12'}‖$fields{'cg13'}‖$fields{'cg14'}‖$fields{'cg15'}‖$fields{'cg16'}‖$fields{'cg17'}‖$fields{'cg18'}‖$fields{'cg19'}‖$fields{'cg20'}‖$fields{'cg21'}‖$fields{'cg22'}‖$fields{'cg23'}‖$fields{'cg24'}‖$fields{'cg25'}‖$fields{'cg26'}‖$fields{'cg27'}‖$fields{'cg28'}‖end\n" if (!$setedit);
	truncate (DAT,tell(DAT));
	flock(DAT,8) if ($OS);
	close(DAT);
&redirect("$indexurl?job=schomana&mon=$fields{'mon'}&DB=$DBname&page=$fields{'page'}&user=$fields{'user'}$userinfo&temp=#lookuser","修改学生成绩完成！");
}
}