2 /************************************************************************
3 * MXChange v0.2.1 Start: 04/24/2005 *
4 * =============== Last change: 05/18/2008 *
6 * -------------------------------------------------------------------- *
7 * File : what-del_sponsor.php *
8 * -------------------------------------------------------------------- *
9 * Short description : Edit sponsor account *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Sponsorenaccount aendern *
12 * -------------------------------------------------------------------- *
14 * -------------------------------------------------------------------- *
15 * Copyright (c) 2003 - 2008 by Roland Haeder *
16 * For more information visit: http://www.mxchange.org *
18 * This program is free software. You can redistribute it and/or modify *
19 * it under the terms of the GNU General Public License as published by *
20 * the Free Software Foundation; either version 2 of the License. *
22 * This program is distributed in the hope that it will be useful, *
23 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
24 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
25 * GNU General Public License for more details. *
27 * You should have received a copy of the GNU General Public License *
28 * along with this program; if not, write to the Free Software *
29 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, *
31 ************************************************************************/
33 // Some security stuff...
34 if ((ereg(basename(__FILE__), $_SERVER['PHP_SELF'])) || (!is_admin()))
36 $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";
40 // Add description as navigation point
41 ADD_DESCR("admin", basename(__FILE__));
43 if (!empty($HTTP_GET_VARS['id']))
45 // Check for selected sponsor
46 $result = SQL_QUERY_ESC("SELECT email, salut, surname, family FROM "._MYSQL_PREFIX."_sponsor_data WHERE id='%s' LIMIT 1",
47 array($HTTP_GET_VARS['id']), __FILE__, __LINE__);
48 if (SQL_NUMROWS($result) == 1)
51 if (isset($HTTP_POST_VARS['ok']))
53 // Load data and remember it in constants
54 list($email, $salut, $surname, $family) = SQL_FETCHROW($result);
55 SQL_FREERESULT($result);
56 define('__EMAIL' , $email);
57 define('__SALUT' , TRANSLATE_SEX($salut));
58 define('__SURNAME', $surname);
59 define('__FAMILY' , $family);
61 // Prepare message and send it away
62 $msg = LOAD_EMAIL_TEMPLATE("del_sponsor", $HTTP_POST_VARS['reason'], $HTTP_GET_VARS['id']);
63 SEND_EMAIL($email, SPONSOR_ADMIN_DEL_SUBJECT, $msg);
66 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_sponsor_data WHERE id='%s' LIMIT 1",
67 array(bigintval($HTTP_GET_VARS['id'])), __FILE__, __LINE__);
70 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_sponsor_orders WHERE sponsorid='%s' LIMIT 1",
71 array(bigintval($HTTP_GET_VARS['id'])), __FILE__, __LINE__);
74 LOAD_TEMPLATE("admin_settings_saved", false, SPONSOR_DELETED_1.$HTTP_GET_VARS['id'].SPONSOR_DELETED_2);
76 elseif (!empty($HTTP_POST_VARS['no']))
78 // Do not delete him...
79 LOAD_URL(URL."/modules.php?module=admin&what=list_sponsor&id=".$HTTP_GET_VARS['id']);
84 list ($email, $salut, $sname, $fname) = SQL_FETCHROW($result);
86 // Transfer data to constants for the template
87 define('__EMAIL', $email);
88 define('__SNAME', $sname);
89 define('__FNAME', $fname);
90 define('__SALUT', TRANSLATE_SEX($salut));
91 define('__UID' , $HTTP_GET_VARS['id']);
94 LOAD_TEMPLATE("admin_del_sponsor");
100 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_SPONSOR_404_1.$HTTP_GET_VARS['id'].ADMIN_SPONSOR_404_2);
105 // Not called by what-list_sponsor.php
106 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_CALL_NOT_DIRECTLY);