Subversion Repositories Sites.tela-botanica.org

Rev

Rev 286 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 286 Rev 398
Line 173... Line 173...
173
    $ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC) ;
173
    $ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC) ;
174
    $id = $ligne[INS_CHAMPS_ID] ;
174
    $id = $ligne[INS_CHAMPS_ID] ;
Line 175... Line 175...
175
 
175
 
176
    // ================ Insertion dans SPIP =========================================
176
    // ================ Insertion dans SPIP =========================================
177
    if (INS_UTILISE_SPIP) inscription_spip($id, $valeur) ;
-
 
-
 
177
    if (INS_UTILISE_SPIP) inscription_spip($id, $valeur) ;
Line 178... Line 178...
178
    if (INS_UTILISE_WIKINI) inscription_interwikini_users($valeur['nom_wiki'], $valeur) ;
178
 
179
    
179
    
180
    // Insertion dans les statistiques
180
    // Insertion dans les statistiques
181
    $requete = 'INSERT INTO '.INS_TABLE_STATISTIQUE.' SET '.INS_STATS_CHAMPS_DATE.'=NOW(), '.INS_STATS_CHAMPS_ACTION.'="add"' ;
181
    $requete = 'INSERT INTO '.INS_TABLE_STATISTIQUE.' SET '.INS_STATS_CHAMPS_DATE.'=NOW(), '.INS_STATS_CHAMPS_ACTION.'="add"' ;
Line 280... Line 280...
280
                INS_CHAMPS_ADRESSE_1 => addslashes($valeur['adresse_1']),
280
                INS_CHAMPS_ADRESSE_1 => addslashes($valeur['adresse_1']),
281
                INS_CHAMPS_ADRESSE_2 => addslashes($valeur['adresse_2']),
281
                INS_CHAMPS_ADRESSE_2 => addslashes($valeur['adresse_2']),
282
                INS_CHAMPS_REGION => addslashes($valeur['region']),
282
                INS_CHAMPS_REGION => addslashes($valeur['region']),
283
                INS_CHAMPS_STRUCTURE => addslashes($valeur['organisme']),
283
                INS_CHAMPS_STRUCTURE => addslashes($valeur['organisme']),
284
                INS_CHAMPS_SITE_WEB => $valeur['site'],
284
                INS_CHAMPS_SITE_WEB => $valeur['site'],
285
                INS_CHAMPS_LETTRE => $valeur['lettre'],
-
 
286
                'U_FONCTION' => addslashes($valeur['fonction']),
285
                'U_FONCTION' => addslashes($valeur['fonction']),
287
                'U_NIV' => $valeur['niveau'],
286
                'U_NIV' => $valeur['niveau'],
288
                'U_ACT' => $valeur['activite'],
287
                'U_ACT' => $valeur['activite'],
289
                'U_ASS' => $valeur['asso'],
288
                'U_ASS' => $valeur['asso'],
290
                'U_SPE' => addslashes($valeur['specialite']),
289
                'U_SPE' => addslashes($valeur['specialite']),
291
                'U_GEO' => addslashes($valeur['specialite_geo'])
290
                'U_GEO' => addslashes($valeur['specialite_geo'])
292
                    ) ;
291
                    ) ;
-
 
292
	if (isset($valeur['lettre'])) $tableau[INS_CHAMPS_LETTRE] = $valeur['lettre'];
293
    return $tableau ;
293
    return $tableau ;
294
}
294
}
Line 295... Line 295...
295
 
295
 
296
/** formulaire_defaults () - Renvoie un tableau avec les valeurs par défaut du formulaire d'inscription
296
/** formulaire_defaults () - Renvoie un tableau avec les valeurs par défaut du formulaire d'inscription
Line 551... Line 551...
551
 *
551
 *
552
 * @global  AUTH    Un objet PEAR::Auth
552
 * @global  AUTH    Un objet PEAR::Auth
553
 * @return  boolean true en cas de succès
553
 * @return  boolean true en cas de succès
554
 */
554
 */
Line 555... Line 555...
555
 
555
 
556
function inscription_lettre ($action) {
556
function inscription_lettre ($action, $courriel = '') {
-
 
557
    $mail = & Mail::factory ('smtp') ;
557
    $mail = & Mail::factory ('smtp') ;
558
    if ($courriel == '') {
-
 
559
    	$email = $GLOBALS['AUTH']->getUsername() ;	
-
 
560
    } else {
-
 
561
    	$email = $courriel ;
558
    $email = $GLOBALS['AUTH']->getUsername() ;
562
    }
559
    $headers ['Return-Path'] = $email ;
563
    $headers ['Return-Path'] = $email ;
560
    $headers ['From'] = "<".$email.">" ;
564
    $headers ['From'] = "<".$email.">" ;
561
    $headers ['Subject'] = $action ;
565
    $headers ['Subject'] = $action ;