Conexion->Cerrar();
//________________________________________________________________________________________________________
?>
Administración web de aulas
'.chr(13);
echo ' var msg=new Array()'.chr(13);
echo ' msg[1]='.$TbMsg[1].chr(13);
echo ' msg[2]='.$TbMsg[2].chr(13);
echo ' msg[3]='.$TbMsg[3].chr(13);
echo ' msg[4]='.$TbMsg[4].chr(13);
echo ' msg[5]='.$TbMsg[5].chr(13);
echo 'alert( msg[' .$resul.'])';
echo '';
?>
CreaParametro("@tipoaccion",$EJECUCION_COMANDO,1);
$cmd->CreaParametro("@idtipoaccion",$identificador,1);
$cmd->CreaParametro("@cateaccion",$PROCESOS,1);
$cmd->CreaParametro("@ambito",$ambito,1);
$cmd->CreaParametro("@idambito",$idambito,1);
$cmd->CreaParametro("@fechahorareg",date("y/m/d H:i:s"),0);
$cmd->CreaParametro("@estado",$ACCION_INICIADA,0);
$cmd->CreaParametro("@resultado",$ACCION_SINERRORES,0);
$cmd->CreaParametro("@idcentro",$idcentro,1);
$cmd->CreaParametro("@parametros","",0);
$cmd->CreaParametro("@descripcion","",0);
$cmd->CreaParametro("@idtarea",0,1);
$cmd->CreaParametro("@idprocedimiento",0,1);
$cmd->CreaParametro("@idcomando",0,1);
$parametros=$ejecutor;
$parametros.="nfn=".$nombrefuncion.chr(13);
$parametros.="tis=".$titulo.chr(13);
$parametros.="dcr=".$descripcion.chr(13);
// Se env� fichero de script
if(!empty($ficheroPOST)){
$posrbc=strpos($nombreOriginal_archivo, "rbc");
if ($posrbc>0 && $tamano_archivo < $MAXSIZEFILERBC) {
if (salvafichero_POST($ficheroPOST,$ficheroLOCAL)){
$fp = fopen ($ficheroLOCAL, "r");
$pseudocodigo = fread ($fp, filesize ($ficheroLOCAL));
fclose ($fp);
if(empty($pseudocodigo)) // No hay c�igo que ejecutar
return(4); // El fichero no contiene c�igo
}
else
return(5); // No se puede salvar el fichero de script enviado por POST
}
else{
return(3); // El fichero no tiene la extension .rbc
}
}
$fp = fopen($ficheroLOCAL,"w");
fwrite($fp, $pseudocodigo,strlen($pseudocodigo));
fclose($fp);
$parametros.="scp=".$pseudocodigo.chr(13);
$parametros.="iph=".$cadenaip.chr(13);
$cmd->ParamSetValor("@parametros",$parametros);
if(!CuestionAcciones($cmd,$shidra,$parametros)) return(2);
return(1);
}
//________________________________________________________________________________________________________
//
// Salva un fichero enviado por POST
//________________________________________________________________________________________________________
function salvafichero_POST($ficheroPost,$ficheroLocal){
if (file_exists($ficheroLocal)) // Borra el fichero si existe
unlink($ficheroLocal);
return(move_uploaded_file($ficheroPost,$ficheroLocal)); // salva el fichero
}
?>