source: trunk/alternc/patches/admin/mman_doaddfromfile.php @ 211

Last change on this file since 211 was 43, checked in by sebas, 17 years ago

ahora si

File size: 1.9 KB
RevLine 
[36]1<?php
2/*
3 $Id: mman_doadd.php 2 2003-06-13 20:30:40Z root $
4 ----------------------------------------------------------------------
5 AlternC - Web Hosting System
6 Copyright (C) 2002 by the AlternC Development Team.
7 http://alternc.org/
8 ----------------------------------------------------------------------
9 Based on:
10 Valentin Lacambre's web hosting softwares: http://altern.org/
11 ----------------------------------------------------------------------
12 LICENSE
13
14 This program is free software; you can redistribute it and/or
15 modify it under the terms of the GNU General Public License (GPL)
16 as published by the Free Software Foundation; either version 2
17 of the License, or (at your option) any later version.
18
19 This program is distributed in the hope that it will be useful,
20 but WITHOUT ANY WARRANTY; without even the implied warranty of
21 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22 GNU General Public License for more details.
23
24 To read the license please visit http://www.gnu.org/copyleft/gpl.html
25 ----------------------------------------------------------------------
26 Original Author of file: Benjamin Sonntag
27 Purpose of file: Create a new mailing-list and ask for the values.
28 ----------------------------------------------------------------------
29*/
30require_once("../class/config.php");
31
32$fileinfo = fopen("/var/alternc/import-data/maillist_list", "r");
33
34while ($data = fscanf($fileinfo, "%s\t%s\t%s\t%s\n")) {
35
36require_once("/var/alternc/bureau/class/config_nochk.php");
37list ($domain,$login,$owner,$pass) = $data;
38
39echo ("Domain: $domain\n");
40echo ("login: $login\n");
41echo ("owner: $owner\n");
42echo ("pass: $pass\n");
43echo ("<br>");
44
45$r=$mailman->add_lst($domain,$login,$owner,$pass);
46
47if (!$r) {
48        $error=$err->errstr();
49} else {
50        $error=_("The mailing list has been successfully created.");
51}
52
53}
54
55fclose($fileinfo);
56$error=0;
57
58require_once("mman_list.php");
59
60exit();
61?>
Note: See TracBrowser for help on using the repository browser.