Newer sponsor scripts found in backup\! :D :D
[mailer.git] / inc / modules / admin / what-del_sponsor.php
1 <?php
2 /************************************************************************
3  * M-XChange v0.2.1                                   Start: 04/24/2005 *
4  * ================                             Last change: 05/19/2008 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : what-del_sponsor.php                             *
8  * -------------------------------------------------------------------- *
9  * Short description : Edit sponsor account                             *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Sponsorenaccount aendern                         *
12  * -------------------------------------------------------------------- *
13  *                                                                      *
14  * -------------------------------------------------------------------- *
15  * Copyright (c) 2003 - 2008 by Roland Haeder                           *
16  * For more information visit: http://www.mxchange.org                  *
17  *                                                                      *
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.       *
21  *                                                                      *
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.                         *
26  *                                                                      *
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,               *
30  * MA  02110-1301  USA                                                  *
31  ************************************************************************/
32
33 // Some security stuff...
34 if ((ereg(basename(__FILE__), $_SERVER['PHP_SELF'])) || (!is_admin())) {
35         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";
36         require($INC);
37 }
38
39 // Add description as navigation point
40 ADD_DESCR("admin", basename(__FILE__));
41
42 if (!empty($_GET['id']))) {
43         // Check for selected sponsor
44         $result = SQL_QUERY_ESC("SELECT email, salut, surname, family FROM "._MYSQL_PREFIX."_sponsor_data WHERE id='%s' LIMIT 1",
45          array(bigintval($_GET['id'])), __FILE__, __LINE__);
46         if (SQL_NUMROWS($result) == 1) {
47                 // Remove sponsor
48                 if (isset($_POST['ok'])) {
49                         // Load data and remember it in constants
50                         list($email, $salut, $surname, $family) = SQL_FETCHROW($result);
51
52                         // Free result
53                         SQL_FREERESULT($result);
54
55                         define('__EMAIL'  , $email);
56                         define('__SALUT'  , TRANSLATE_SEX($salut));
57                         define('__SURNAME', $surname);
58                         define('__FAMILY' , $family);
59
60                         // Prepare message and send it away
61                         $msg = LOAD_EMAIL_TEMPLATE("del_sponsor", $_POST['reason'], bigintval($_GET['id']));
62                         SEND_EMAIL($email, SPONSOR_ADMIN_DEL_SUBJECT, $msg);
63
64                         // Remove account
65                         $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_sponsor_data WHERE id='%s' LIMIT 1",
66                          array(bigintval($_GET['id'])), __FILE__, __LINE__);
67
68                         // Remove orders
69                         $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_sponsor_orders WHERE sponsorid='%s' LIMIT 1",
70                          array(bigintval($_GET['id'])), __FILE__, __LINE__);
71
72                         // Output message
73                         LOAD_TEMPLATE("admin_settings_saved", false, SPONSOR_DELETED_1.bigintval($_GET['id']).SPONSOR_DELETED_2);
74                 } elseif (!empty($_POST['no'])) {
75                         // Do not delete him...
76                         LOAD_URL(URL."/modules.php?module=admin&amp;what=list_sponsor&amp;id=".bigintval($_GET['id']));
77                 } else {
78                         // Load data
79                         list ($email, $salut, $sname, $fname) = SQL_FETCHROW($result);
80
81                         // Transfer data to constants for the template
82                         define('__EMAIL', $email);
83                         define('__SNAME', $sname);
84                         define('__FNAME', $fname);
85                         define('__SALUT', TRANSLATE_SEX($salut));
86                         define('__UID'  , bigintval($_GET['id']));
87
88                         // Display form
89                         LOAD_TEMPLATE("admin_del_sponsor");
90                 }
91         } else {
92                 // Sponsor not found!
93                 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_SPONSOR_404_1.bigintval($_GET['id']).ADMIN_SPONSOR_404_2);
94         }
95 } else {
96         // Not called by what-list_sponsor.php
97         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_CALL_NOT_DIRECTLY);
98 }
99
100 //
101 ?>