Subversion Repositories Sites.tela-botanica.org

Rev

Rev 96 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 96 Rev 375
Line 44... Line 44...
44
// |                                           LISTE de FONCTIONS                                         |
44
// |                                           LISTE de FONCTIONS                                         |
45
// +------------------------------------------------------------------------------------------------------+
45
// +------------------------------------------------------------------------------------------------------+
Line 46... Line 46...
46
 
46
 
47
function inscription_spip($id, $valeurs)
47
function inscription_spip($id, $valeurs)
48
{
-
 
49
    $db = &DB::connect(INS_DSN_SPIP) ;
48
{
50
    // Requete pour inscrire dans SPIP
-
 
51
 
49
    // Requete pour inscrire dans SPIP
52
    $requete = "insert into spip_auteurs set id_auteur=$id, nom=\"".$valeurs['prenom']." ".$valeurs['nom'].
50
    $requete = "insert into ".INS_BDD_SPIP.".spip_auteurs set id_auteur=$id, nom=\"".$valeurs['prenom']." ".$valeurs['nom'].
53
                "\",email=\"".$valeurs['email']."\",login=\"".$valeurs['email'].
51
                "\",email=\"".$valeurs['email']."\",login=\"".$valeurs['email'].
54
                "\", pass=\"".md5($valeurs['mot_de_passe'])."\", statut=\"1comite\", lang=\"".
52
                "\", pass=\"".md5($valeurs['mot_de_passe'])."\", statut=\"1comite\", lang=\"".
55
                strtolower($valeurs['pays'])."\"" ;
53
                strtolower($valeurs['pays'])."\"" ;
-
 
54
    $GLOBALS['ins_db']->query($requete) ;
56
    $db->query($requete) ;
55
 
Line 57... Line 56...
57
}
56
}
58
 
57
 
59
function mod_inscription_spip($id)
58
function mod_inscription_spip($id)
60
{
-
 
61
    global $HTTP_POST_VARS ;
59
{
62
    $db = &DB::connect(INS_DSN_SPIP) ;
60
    global $HTTP_POST_VARS ;
63
    //BIEN METTRE alea_actuel, htpass ET alea_futur À ""
61
    //BIEN METTRE alea_actuel, htpass ET alea_futur À ""
64
     $requete = "update spip_auteurs set nom=\"".$HTTP_POST_VARS['prenom']." ".$HTTP_POST_VARS['nom'].
62
     $requete = "update ".INS_BDD_SPIP.".spip_auteurs set nom=\"".$HTTP_POST_VARS['prenom']." ".$HTTP_POST_VARS['nom'].
65
                "\",email=\"".$HTTP_POST_VARS['email']."\",login=\"".$HTTP_POST_VARS['email'].
63
                "\",email=\"".$HTTP_POST_VARS['email']."\",login=\"".$HTTP_POST_VARS['email'].
66
                "\", pass=\"".md5($HTTP_POST_VARS['mot_de_passe'])."\", htpass=\"\", alea_actuel=\"\", alea_futur=\"\", lang=\"en\" where id_auteur=$id" ;
64
                "\", pass=\"".md5($HTTP_POST_VARS['mot_de_passe'])."\", htpass=\"\", alea_actuel=\"\", alea_futur=\"\", lang=\"en\" where id_auteur=$id" ;
67
    //echo $requete;
65
    //echo $requete;
-
 
66
    $GLOBALS['ins_db']->query($requete) ;
68
    $db->query($requete) ;
67
}
69
}
68
 
70
function desinscription_spip($id_utilisateur)
-
 
71
{
69
function desinscription_spip($id_utilisateur)
72
    $db = &DB::connect(INS_DSN_SPIP) ;
70
{
73
    //BIEN METTRE alea_actuel, htpass ET alea_futur À ""
71
    //BIEN METTRE alea_actuel, htpass ET alea_futur À ""
74
     $requete = 'delete from spip_auteurs where id_auteur='.$id_utilisateur ;
72
     $requete = 'DELETE FROM '.INS_BDD_SPIP.'.spip_auteurs WHERE id_auteur='.$id_utilisateur ;
75
    //echo $requete;
73
    //echo $requete;
76
    $resultat = $db->query ($requete) ;
74
    $resultat = $GLOBALS['ins_db']->query ($requete) ;
77
    if (DB::isError ($resultat)) {
75
    if (DB::isError ($resultat)) {
78
        return "Echec de la requete : $requete<br />".$resultat->getMessage() ;
76
        return "Echec de la requete : $requete<br />".$resultat->getMessage() ;