| 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.php,v 1.2 2005-03-02 12:44:41 alex Exp $
|
22 |
// CVS : $Id: inscription.php,v 1.3 2005-03-08 17:44:02 alex Exp $
|
| 23 |
/**
|
23 |
/**
|
| 24 |
* Inscription
|
24 |
* Inscription
|
| 25 |
*
|
25 |
*
|
| 26 |
* Un module d'inscription, en général ce code est spécifique à
|
26 |
* Un module d'inscription, en général ce code est spécifique à
|
| 27 |
* un site web
|
27 |
* un site web
|
| Line 29... |
Line 29... |
| 29 |
*@package inscription
|
29 |
*@package inscription
|
| 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 |
*@copyright Tela-Botanica 2000-2004
|
33 |
*@copyright Tela-Botanica 2000-2004
|
| 34 |
*@version $Revision: 1.2 $ $Date: 2005-03-02 12:44:41 $
|
34 |
*@version $Revision: 1.3 $ $Date: 2005-03-08 17:44:02 $
|
| 35 |
// +------------------------------------------------------------------------------------------------------+
|
35 |
// +------------------------------------------------------------------------------------------------------+
|
| 36 |
*/
|
36 |
*/
|
| Line 37... |
Line 37... |
| 37 |
|
37 |
|
| 38 |
// +------------------------------------------------------------------------------------------------------+
|
38 |
// +------------------------------------------------------------------------------------------------------+
|
| Line 59... |
Line 59... |
| 59 |
|
59 |
|
| Line 60... |
Line 60... |
| 60 |
function afficherContenuCorps() {
|
60 |
function afficherContenuCorps() {
|
| 61 |
|
61 |
|
| 62 |
$url = preg_replace ("/&/", "&", INS_URL_DOCUMENT) ;
|
62 |
$url = preg_replace ("/&/", "&", INS_URL_DOCUMENT) ;
|
| 63 |
if (!isset ($GLOBALS['action'])) $GLOBALS['action'] = "" ;
|
63 |
if (!isset ($GLOBALS['action'])) $GLOBALS['action'] = "" ;
|
| Line 64... |
Line 64... |
| 64 |
$res = "" ;
|
64 |
$res = '' ;
|
| 65 |
$est_loggue = true ;
|
65 |
$est_loggue = true ;
|
| 66 |
|
66 |
|
| Line 73... |
Line 73... |
| 73 |
|
73 |
|
| 74 |
// L'utilisateur a-t-il cliqué sur Supprimer inscription
|
74 |
// L'utilisateur a-t-il cliqué sur Supprimer inscription
|
| 75 |
if (isset ($GLOBALS['supprimer'])) {
|
75 |
if (isset ($GLOBALS['supprimer'])) {
|
| 76 |
$id_utilisateur = $GLOBALS['AUTH']->getAuthData(INS_CHAMPS_ID) ;
|
76 |
$id_utilisateur = $GLOBALS['AUTH']->getAuthData(INS_CHAMPS_ID) ;
|
| 77 |
//desinscription_interwikini_users ($GLOBALS['AUTH']->getAuthData(INS_CHAMPS_LOGIN)) ;
|
77 |
//desinscription_interwikini_users ($GLOBALS['AUTH']->getAuthData(INS_CHAMPS_LOGIN)) ;
|
| Line 78... |
Line -... |
| 78 |
$requete = "delete from ".INS_ANNUAIRE." where ".INS_CHAMPS_ID."=".$id_utilisateur;
|
- |
|
| 79 |
|
78 |
$resultat = $GLOBALS['AUTH']->removeUser($mail_utilisateur) ;
|
| 80 |
$GLOBALS['ins_db']->query ($requete) ;
|
79 |
|
| 81 |
if (DB::isError($resultat)) {
|
80 |
if (PEAR::isError($resultat)) {
|
| 82 |
die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;
|
81 |
die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;
|
| 83 |
}
|
82 |
}
|
| 84 |
// Suppression dans SPIP
|
83 |
// Suppression dans SPIP
|
| Line 156... |
Line 155... |
| 156 |
return $res ;
|
155 |
return $res ;
|
| 157 |
}
|
156 |
}
|
| 158 |
/* +--Fin du code ----------------------------------------------------------------------------------------+
|
157 |
/* +--Fin du code ----------------------------------------------------------------------------------------+
|
| 159 |
*
|
158 |
*
|
| 160 |
* $Log: not supported by cvs2svn $
|
159 |
* $Log: not supported by cvs2svn $
|
| - |
|
160 |
* Revision 1.2 2005/03/02 12:44:41 alex
|
| - |
|
161 |
* Correction du bug message d'erreur alors qu'on tente de s'inscrire simplement
|
| - |
|
162 |
*
|
| 161 |
* Revision 1.1 2004/12/15 13:32:15 alex
|
163 |
* Revision 1.1 2004/12/15 13:32:15 alex
|
| 162 |
* version initiale
|
164 |
* version initiale
|
| 163 |
*
|
165 |
*
|
| 164 |
* Revision 1.2 2004/09/01 16:36:37 alex
|
166 |
* Revision 1.2 2004/09/01 16:36:37 alex
|
| 165 |
* changement du chemin pour les include
|
167 |
* changement du chemin pour les include
|