//Autres auteurs : *@author Jean-Pascal MILCENT *@copyright Tela-Botanica 2000-2003 *@version 01 avril 2002 // +-----------------------------------------------------------------------------------------------+ // // $Id: carto_ad.php,v 1.9 2003/05/06 12:49:27 alex Exp $ // FICHIER : $RCSfile: carto_ad.php,v $ // AUTEUR : $Author: alex $ // VERSION : $Revision: 1.9 $ // DATE : $Date: 2003/05/06 12:49:27 $ */ include_once 'modules/client/carto_ad/carto-common_ad.php'; include_once 'php/context.php'; include_once 'php/auth.php'; global $var_style; $var_style='alex'; include_once 'php/lib/pack.lib.carto.php'; //================================================================================================ //================================================================================================ function putFrame () { global $GS_GLOBAL; global $AUTH_GLOBAL; global $image_x; global $image_y; global $historique_cartes; global $mailer; global $fin; global $sendpwd;//utilisé dans tb_ad.php global $titre, $corps;//utilisé dans tb_ad.php global $select;//utilisé dans tb_ad.php global $liste_zone_carte; //=========================================================================================================== $requete_01 = "SELECT *,count(cp_id_continent) as nbr". " FROM annuaire_tela, carto_PAYS". " WHERE u_country = cp_id_pays". " AND u_show = 3". " GROUP BY cp_id_continent"; $resultat_01 = mysql_query ($requete_01) or die('

Erreur de requête

'. 'Requete : '.$requete_01. '

Erreur : '.mysql_error()); $tableau_ad_continent=array(); while ($ligne_01 = mysql_fetch_object($resultat_01)) { $tableau_ad_continent[$ligne_01->CP_ID_Continent] = $ligne_01->nbr; } $info_continent['nom_table_zone'] = 'carto_CONTINENT'; $info_continent['nom_chp_id_zone'] = 'CC_ID_Continent'; $info_continent['nom_chp_nom_zone'] = 'CC_Intitule_continent'; $info_continent['nom_chp_rouge'] = 'CC_Couleur_R'; $info_continent['nom_chp_vert'] = 'CC_Couleur_V'; $info_continent['nom_chp_bleu'] = 'CC_Couleur_B'; $info_continent['nom_chp_zone_sup'] = ''; $info_continent['tableau_valeurs_zone'] = $tableau_ad_continent; //============================================================================================================ $requete_02 = 'SELECT CC_ID_Continent'. ' FROM carto_CONTINENT'; $resultat_02 = mysql_query ($requete_02) or die('

Erreur de requête

'. 'Requete : '.$requete_02. '

Erreur : '.mysql_error()); while ($ligne_02 = mysql_fetch_object($resultat_02)) { $requete_03 = 'SELECT *, count(cp_id_pays) as nbr '. ' FROM annuaire_tela, carto_PAYS'. ' WHERE u_country = cp_id_pays'. ' AND cp_id_continent = "'.$ligne_02->CC_ID_Continent.'"'. ' AND u_show = 3'. ' GROUP BY cp_id_pays'; $resultat_03 = mysql_query ($requete_03) or die('

Erreur de requête

'. 'Requete : '.$requete_01. '

Erreur : '.mysql_error()); $tableau_ad_pays = array(); while ($ligne_03 = mysql_fetch_object($resultat_03)) { $tableau_ad_pays[$ligne_03->CP_ID_Pays] = $ligne_03->nbr; } $info_pays[$ligne_02->CC_ID_Continent]['nom_table_zone'] = 'carto_PAYS'; $info_pays[$ligne_02->CC_ID_Continent]['nom_chp_id_zone'] = 'CP_ID_Pays'; $info_pays[$ligne_02->CC_ID_Continent]['nom_chp_nom_zone'] = 'CP_Intitule_pays'; $info_pays[$ligne_02->CC_ID_Continent]['nom_chp_rouge'] = 'CP_Couleur_R'; $info_pays[$ligne_02->CC_ID_Continent]['nom_chp_vert'] = 'CP_Couleur_V'; $info_pays[$ligne_02->CC_ID_Continent]['nom_chp_bleu'] = 'CP_Couleur_B'; $info_pays[$ligne_02->CC_ID_Continent]['nom_chp_zone_sup'] = 'CP_ID_Continent'; $info_pays[$ligne_02->CC_ID_Continent]['tableau_valeurs_zone'] = $tableau_ad_pays; } //============================================================================================================ $requete_04 = "SELECT * ,count(cd_id_departement) as nbr". " FROM annuaire_tela, carto_DEPARTEMENT". " WHERE u_country = 'fr'". " AND u_french_dpt = cd_id_departement". " AND u_show = 3". " GROUP BY cd_id_Departement"; $resultat_04 = mysql_query ($requete_04) or die('

Erreur de requête

'. 'Requete : '.$requete_01. '

Erreur : '.mysql_error()); $tableau_ad_dpt_france = array(); while ($ligne_04 = mysql_fetch_object($resultat_04)) { $tableau_ad_dpt_france[$ligne_04->CD_ID_Departement] = $ligne_04->nbr; } $info_dpt_france['nom_table_zone'] = 'carto_DEPARTEMENT'; $info_dpt_france['nom_chp_id_zone'] = 'CD_ID_Departement'; $info_dpt_france['nom_chp_nom_zone'] = 'CD_Intitule_departement'; $info_dpt_france['nom_chp_rouge'] = 'CD_Couleur_R'; $info_dpt_france['nom_chp_vert'] = 'CD_Couleur_V'; $info_dpt_france['nom_chp_bleu'] = 'CD_Couleur_B'; $info_dpt_france['nom_chp_zone_sup'] = 'CD_ID_Pays'; $info_dpt_france['tableau_valeurs_zone'] = $tableau_ad_dpt_france; //============================================================================================================ // On cree tout d'abords l'arborescence $monde = new Carto_Carte ('continent', '', 'Monde', 'monde_masque5c.png', 'monde5c.png', 'Local/tela/carto/', $info_continent); $monde->historique_cartes = $historique_cartes; $monde->image_x = $image_x; $monde->image_y = $image_y; $monde->liste_zone_carte = $liste_zone_carte; $monde->url = "document.php?project=tela&locale=fr&doc=adherents&page=".$GS_GLOBAL['current_page_ndx']; foreach ($info_pays as $cle => $valeur) { $requete_05 = "SELECT CDC_Titre_carte, CDC_ID_Carte, CDC_Carte_fond, CDC_Carte_masque, CDC_ID_Zone_geo_carte". " FROM carto_DESCRIPTION_CARTE, carto_ACTION ". " WHERE CA_ID_Zone_geo = '$cle'". " AND CA_Type_zone = 1". " AND CA_ID_Carte_destination = CDC_ID_Carte"; $resultat_05 = mysql_query ($requete_05) or die('

Erreur de requête

'. 'Requete : '.$requete_01. '

Erreur : '.mysql_error()); $ligne_05 = mysql_fetch_object($resultat_05); $monde->ajouterFils($ligne_05->CDC_ID_Carte, $ligne_05->CDC_ID_Zone_geo_carte, $ligne_05->CDC_Titre_carte, $ligne_05->CDC_Carte_masque, $ligne_05->CDC_Carte_fond, $valeur); } $monde->fils['europe']->ajouterFils('france', 'fr', 'France' ,'france_masque.png', 'france_region.png', $info_dpt_france); // Une fois l'arborescence créee on lance la methode donnerFormulaireImage() pour recuperer la carte // (dans $img). S'il n'y a pas de carte a afficher donnerFormulaireImage() renvoi false. On peut alors recuperer // le niveau ou on en est grace a $monde->historique (du type continent*namerique*ca). $res = ''; $img = false; if ($mailer == 1 || $fin == true) { $objet_carte = cxt_getVariable ($GS_GLOBAL['mysql_db'], $GS_GLOBAL['link'], "carte"); $monde = unserialize($objet_carte);} else { $img = $monde->donnerFormulaireImage(); } // On teste donc img if (!$img ) { include 'modules/client/carto_ad/tb_ad.php'; return $res; } else { $historique_carte = new Carto_HistoriqueCarte ($monde, '>', 'lien_non_souligne'); $res .= ''."\n"; $res .= ''."\n"; $res .= ''; $tab = explode('*',$monde->historique); $res .= carto_ad_consulterNbreInscrits($tab[(count($tab)-1)]); $res .= ''; $res .= ''."\n"; $res .= ''; $res .= ''."\n"; $res .= ''."\n"; $res .= ' '."\n"; $res .= ''."\n"; $res .= '

'; $res .= $historique_carte->afficherHistoriqueCarte(); $res .= '

'; $res .= $img; $res .= '

'; $res .= 'Cliquez sur une zone de la carte pour zoomer.'; $res .= '
La couleur est proportionnelle au nombre d\'adhérents.

Avertissement et déni de responsabilité :

La représentation et l\'utilisation des frontières, des noms géographiques et autres données employés sur les cartes et utilisés dans les listes, les tableaux, les documents et les bases de données de ce site ne sont pas garanties sans erreurs, de même qu\'elles n\'engagent pas la responsabilité de l\'association ni n\'impliquent de reconnaissance officielle de sa part.

'; return $res; } } //-- Fin du code source ------------------------------------------------------------ /* * $Log: carto_ad.php,v $ * Revision 1.9 2003/05/06 12:49:27 alex * remplacement include par include_once * * Revision 1.8 2003/03/07 15:20:32 jpm * Correction d'une erreur de texte. * * Revision 1.7 2003/02/28 08:43:33 jpm * Gestion des nouvelles tables MySql carto. * * Revision 1.6 2003/02/21 13:50:19 jpm * Mise à jour nouvel objet Carto_Carte. * * Revision 1.5 2003/02/17 14:33:52 jpm * Modification pour être compatible avec la nouvelle classe carte. * * */ ?>