Subversion Repositories Applications.papyrus

Rev

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

Rev 1292 Rev 1298
Line 17... Line 17...
17
// |                                                                                                      |
17
// |                                                                                                      |
18
// | You should have received a copy of the GNU Lesser General Public                                     |
18
// | You should have received a copy of the GNU Lesser General Public                                     |
19
// | License along with this library; if not, write to the Free Software                                  |
19
// | License along with this library; if not, write to the Free Software                                  |
20
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
20
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21
// +------------------------------------------------------------------------------------------------------+
21
// +------------------------------------------------------------------------------------------------------+
22
// CVS : $Id: inscription.fonct.wiki.php,v 1.5 2007-04-06 08:35:46 neiluj Exp $
22
// CVS : $Id: inscription.fonct.wiki.php,v 1.6 2007-04-11 08:30:12 neiluj Exp $
23
/**
23
/**
24
* Fonctions wikini
24
* Fonctions wikini
25
*
25
*
26
* Ce fichier propose 3 fonctions pour intervenir sur la table interwikini_users.
26
* Ce fichier propose 3 fonctions pour intervenir sur la table interwikini_users.
27
*
27
*
Line 30... Line 30...
30
//Auteur original :
30
//Auteur original :
31
*@author        Alexandre Granier <alexandre@tela-botanica.org>
31
*@author        Alexandre Granier <alexandre@tela-botanica.org>
32
//Autres auteurs :
32
//Autres auteurs :
33
*@author        Aucun
33
*@author        Aucun
34
*@copyright     Tela-Botanica 2000-2004
34
*@copyright     Tela-Botanica 2000-2004
35
*@version       $Revision: 1.5 $ $Date: 2007-04-06 08:35:46 $
35
*@version       $Revision: 1.6 $ $Date: 2007-04-11 08:30:12 $
36
// +------------------------------------------------------------------------------------------------------+
36
// +------------------------------------------------------------------------------------------------------+
37
*/
37
*/
Line 38... Line 38...
38
 
38
 
39
// +------------------------------------------------------------------------------------------------------+
39
// +------------------------------------------------------------------------------------------------------+
Line 43... Line 43...
43
// +------------------------------------------------------------------------------------------------------+
43
// +------------------------------------------------------------------------------------------------------+
44
// |                                           LISTE de FONCTIONS                                         |
44
// |                                           LISTE de FONCTIONS                                         |
45
// +------------------------------------------------------------------------------------------------------+
45
// +------------------------------------------------------------------------------------------------------+
Line 46... Line 46...
46
 
46
 
-
 
47
function inscription_interwikini_users($id, $valeur) {
-
 
48
    // On vérifie l'existance du nom wiki dans interwikini_users
-
 
49
    $requete_verif = 'select name from interwikini_users where name="'.$valeur['nom_wiki'].'"';
-
 
50
    $resultat_verif = $GLOBALS['ins_db']->query ($requete_verif) ;
-
 
51
    if (DB::isError($resultat_verif)) {
47
function inscription_interwikini_users($id, $valeur) {
52
        echo ("Echec de la requete dans interwikini_users<br />".$resultat_verif->getMessage()) ;
-
 
53
    }
-
 
54
    if ($resultat_verif->numRows() != 0) {
-
 
55
    	return ;	
48
    
56
    }
49
    $requete = "insert into interwikini_users set name=\"".$valeur['nom_wiki'].
57
    $requete = "insert into interwikini_users set name=\"".$valeur['nom_wiki'].
-
 
58
                "\", password=\"".md5($valeur['mot_de_passe'])."\", email=\"".$valeur['email']."\"".
50
                "\", password=\"".md5($valeur['mot_de_passe'])."\", email=\"".$valeur['email']."\"" ;
59
                ', signuptime=now()' ;
51
    $resultat = $GLOBALS['ins_db']->query ($requete) ;
60
    $resultat = $GLOBALS['ins_db']->query ($requete) ;
52
    if (DB::isError($resultat)) {
61
    if (DB::isError($resultat)) {
53
        echo ("Echec de la requete dans interwikini_users<br />".$resultat->getMessage()) ;
62
        echo ("Echec de la requete dans interwikini_users<br />".$resultat->getMessage()) ;
54
    }
63
    }
Line 72... Line 81...
72
    }
81
    }
73
}
82
}
Line 74... Line 83...
74
 
83
 
75
function verif_doublonNomWiki($nom_wiki) {
84
function verif_doublonNomWiki($nom_wiki) {
76
    global $db ;
85
    global $db ;
77
    $requete = "select name from interwikini_users where name = \"$nom_wiki\" limit 1" ;
86
    $requete = "select name from interwikini_users where name = \"$nom_wiki\"" ;
78
    $resultat = $db->query ($requete) ;
87
    $resultat = $db->query ($requete) ;
79
    if (DB::isError ($resultat)) {
88
    if (DB::isError ($resultat)) {
80
    	die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;
89
    	die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;
81
    }
90
    }
Line 105... Line 114...
105
}
114
}
Line 106... Line 115...
106
 
115
 
107
/* +--Fin du code ----------------------------------------------------------------------------------------+
116
/* +--Fin du code ----------------------------------------------------------------------------------------+
108
*
117
*
-
 
118
* $Log: not supported by cvs2svn $
-
 
119
* Revision 1.4  2006/07/04 09:39:03  alexandre_tb
-
 
120
* correction d'un bug mineur
-
 
121
*
-
 
122
* Revision 1.3  2006/04/11 08:42:07  alexandre_tb
-
 
123
* Vérification de l'existance d'un nom wiki avant son insertion
109
* $Log: not supported by cvs2svn $
124
*
110
* Revision 1.2  2005/09/29 13:56:48  alexandre_tb
125
* Revision 1.2  2005/09/29 13:56:48  alexandre_tb
111
* En cours de production. Reste à gérer les news letters et d'autres choses.
126
* En cours de production. Reste à gérer les news letters et d'autres choses.
112
*
127
*
113
* Revision 1.1  2005/09/22 14:02:49  ddelon
128
* Revision 1.1  2005/09/22 14:02:49  ddelon