Subversion Repositories Sites.tela-botanica.org

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
5 david 1
<?php
2
 
3
/***************************************************************************\
4
 *  SPIP, Systeme de publication pour l'internet                           *
5
 *                                                                         *
6
 *  Copyright (c) 2001-2005                                                *
7
 *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
8
 *                                                                         *
9
 *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
10
 *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
11
\***************************************************************************/
12
 
13
 
14
include ("inc.php3");
15
 
16
include_ecrire ("inc_sites.php3");
17
 
18
if ($connect_statut == '0minirezo' AND $supp_syndic) {
19
	$query="DELETE FROM spip_syndic WHERE id_syndic=".intval($supp_syndic);
20
	$result=spip_query($query);
21
}
22
 
23
 
24
debut_page(_T('titre_page_sites_tous'),"documents","sites");
25
debut_gauche();
26
 
27
 
28
 
29
debut_droite();
30
 
31
 
32
 
33
$proposer_sites=lire_meta("proposer_sites");
34
 
35
 
36
 
37
 
38
afficher_sites(_T('titre_sites_tous'), "SELECT * FROM spip_syndic WHERE syndication='non' AND statut='publie' ORDER BY nom_site");
39
 
40
 
41
afficher_sites(_T('titre_sites_syndiques'), "SELECT * FROM spip_syndic WHERE (syndication='oui' OR syndication='sus') AND statut='publie' ORDER BY nom_site");
42
 
43
 
44
afficher_sites(_T('titre_sites_proposes'), "SELECT * FROM spip_syndic WHERE statut='prop' ORDER BY nom_site");
45
 
46
if ($connect_statut == '0minirezo' OR $proposer_sites > 0) {
47
	echo "<div align='right'>";
48
	$link = new Link('sites_edit.php3');
49
	$link->addVar('target', 'sites.php3');
50
	$link->addVar('redirect', $clean_link->getUrl());
51
	icone(_T('icone_referencer_nouveau_site'), $link->getUrl(), "site-24.gif", "creer.gif");
52
	echo "</div>";
53
}
54
 
55
 
56
 
57
afficher_sites(_T('avis_sites_probleme_syndication'), "SELECT * FROM spip_syndic WHERE syndication='off' AND statut='publie' ORDER BY nom_site");
58
 
59
if ($options == 'avancees' AND $connect_statut == '0minirezo') {
60
	afficher_sites(_T('info_sites_refuses'), "SELECT * FROM spip_syndic WHERE statut='refuse' ORDER BY nom_site");
61
}
62
 
63
afficher_syndic_articles(_T('titre_dernier_article_syndique'),
64
                "SELECT * FROM spip_syndic_articles ORDER BY date DESC LIMIT 0,50", 'afficher site');
65
 
66
fin_page();
67
 
68
?>
69