$ObjUser = new CUser();
$NewPassWord = RandomPassWord();
$ObjUser->SetLogin($ValLoginTuteur);
$ObjUser->SetPassWord(md5($NewPassWord));
$ObjUser->SetStatus(TUTEUR);
$ObjUser->SetCivilite($ValCiviliteTuteur);
$ObjUser->SetNom(ProtectApos($ValNomTuteur));
$ObjUser->SetPrenom(ProtectApos($ValPrenomTuteur));
$ObjUser->SetMail($ValMailTuteur);
$ObjUser->SetTel($ValTelTuteur);
$ObjUser->SetFax($ValFaxTuteur);
$ObjUser->SetFK_Entreprise($ValFK_Entreprise);
$ObjUser->Insert();
// Suppression de l'inscription de la table
$ObjInscript = new CNewInscript($IdentPK);
$ObjInscript->Delete();
// Enregistrement du mail à envoyer
$ConnectStages->query("INSERT INTO {$NomTabMailsToSend} VALUES (\n\t\t\t \t '{$ValLoginTuteur}',\n\t\t\t\t '{$NewPassWord}',\n\t\t\t\t '{$ValCiviliteTuteur}',\n\t\t\t\t '" . addslashes($ValNomTuteur) . "',\n\t\t\t\t '" . addslashes($ValPrenomTuteur) . "',\n '{$ValMailTuteur}');");
?>
<script>
location.replace("?Trait=List&SlxTable=<?php
echo $NomTabNewInscripts;
?>
");
</script>
<?php
die;
}
break;
}
$Titre = 'Validation d\'une inscription';
