Ejemplo n.º 1
0
{
  // Vérifier le domaine du serveur mail (hébergement Sésamath donc serveur ouvert sur l'extérieur).
  list($mail_domaine,$is_domaine_valide) = tester_domaine_courriel_valide($courriel);
  if(!$is_domaine_valide)
  {
    exit('Erreur avec le domaine "'.$mail_domaine.'" !');
  }
  // Verifier que la liste des connecteurs commence et se termine par une virgule (corriger sinon)
  $connecteurs = (mb_substr($connecteurs,0,1)==',') ? $connecteurs : ','.$connecteurs ;
  $connecteurs = (mb_substr($connecteurs,-1) ==',') ? $connecteurs : $connecteurs.',' ;
  // Générer un mdp aléatoire
  $password = fabriquer_mdp();
  // Insérer l'enregistrement
  $partenaire_id = DB_WEBMESTRE_WEBMESTRE::DB_ajouter_partenaire_conventionne( $denomination , $nom , $prenom , $courriel , crypter_mdp($password) , $connecteurs );
  // Envoyer un courriel
  $texte = Webmestre::contenu_courriel_partenaire_ajout( $denomination , $nom , $prenom , $password , URL_DIR_SACOCHE );
  $courriel_bilan = Sesamail::mail( $courriel , 'Création compte partenaire ENT' , $texte );
  if(!$courriel_bilan)
  {
    exit('Erreur lors de l\'envoi du courriel !');
  }
  // Afficher le retour
  echo'<tr id="id_'.$partenaire_id.'" class="new">';
  echo  '<td>'.$partenaire_id.'</td>';
  echo  '<td>'.html($denomination).'</td>';
  echo  '<td>'.html($nom).'</td>';
  echo  '<td>'.html($prenom).'</td>';
  echo  '<td>'.html($courriel).'</td>';
  echo  '<td>'.html($connecteurs).'</td>';
  echo  '<td class="nu">';
  echo    '<q class="modifier" title="Modifier ce partenaire."></q>';