Cette page fournit des liens vers des sites en rapport avec la pratique de la généalogie."); print("
J'indexe les sites pour lesquels j'ai trouvé un contenu en ligne digne d'intérêt. "); print("Ces choix restent subjectifs et il existe sûrement beaucoup d'autres sites intéressants."); print("
Toute remarque ou suggestion à propos de ce site sera la bienvenue. "); print("Si vous connaissez des sites pouvant y être référencés, ou décelez des liens devenus invalides, merci de m'en faire part."); print("

"); print(""); for ($i=0;$i<$nb_theme;$i+=3) { print(""); if ($i < $nb_theme) { print(""); } else { print(""); } if ($i < $nb_theme-1) { print(""); } else { print(""); } if ($i < $nb_theme-2) { print(""); } else { print(""); } print(""); } print("

".$nom_theme[$i]." (".$nb_links[$i].")

".$nom_theme[$i+1]." (".$nb_links[$i+1].")

".$nom_theme[$i+2]." (".$nb_links[$i+2].")

"); print("

"); print(""); print(""); print(""); print(""); print(""); print(""); print(""); print(""); print(""); print("

Objet/Thème du site "); for ($i=0;$i<$nb_theme;$i++) { print("".$nom_theme[$i]); } print("

Pays "); for ($i=0;$i<$nb_pays;$i++) { print("".$nom_pays[$i]); } print("

Département "); for ($j=1;$j<96;$j++) { print("".frm_num($j)); } print("

"); } else { # listage des sites selon les critères $champ[0] = "Bases"; $champ[0] = "Données"; $champ[1] = "Sites"; $champ[4] = "Pays"; $champ[5] = "Pays/Dept"; $champ[6] = "Geneabank"; $champ[7] = "Bigenet"; $champ[8] = "Actes numérisés"; $champ[9] = "Commentaire"; $col[1] = 1; $text[1] = 1; $size[1] = 30; $nota = ""; if ($theme == 1) { # archives $nb_col = 4; $col[2] = 5; $text[2] = 1; $size[2] = 10; $col[3] = 8; $text[3] = 0; $size[3] = 10; $col[4] = 9; $text[4] = 1; $size[4] = 50; $nota = "La colonne 'Actes numérisés' indique les archives mettant à disposition libre sur Internet les actes numérisés"; } elseif ($theme == 2) { # cercles $nb_col = 5; $col[2] = 5; $text[2] = 1; $size[2] = 10; $col[3] = 6; $text[3] = 0; $size[3] = 10; $col[4] = 7; $text[4] = 0; $size[4] = 10; $col[5] = 9; $text[5] = 1; $size[5] = 40; $nota = "Il faut être adhérent d'un cercle ou d'une association généalogique déposant ses relevés dans Généabank, pour pouvoir consulter l'ensemble des dépouillements déposés dans la base de données"; } elseif ($theme == 15) { # étranger $nb_col = 3; $col[2] = 4; $text[2] = 1; $size[2] = 20; $col[3] = 9; $text[3] = 1; $size[3] = 50; } elseif ($theme == "") { # recherche avancée sans thème sélectionné $nb_col = 4; $col[2] = 5; $text[2] = 1; $size[2] = 10; $col[3] = 0; $text[3] = 1; $size[3] = 10; $col[4] = 9; $text[4] = 1; $size[4] = 50; } else { $nb_col = 2; $col[2] = 9; $text[2] = 1; $size[2] = 70; } print(""); print(""); for ($i=1;$i<=$nb_col;$i++) { $j = $col[$i]; print(""); } print(""); $n = 0; for ($k=0;$k"); for ($i=1;$i<=$nb_col;$i++) { $j = $col[$i]; if ($j == 1) { # site $align = " align=left"; $line = "".$data[1].""; } elseif ($j == 9) { # commentaire $align = " align=left"; $line = Nz($data[9]); } elseif ($j == 5) { # pays / départements $align = " align=center"; if (($data[4] != "")&&($data[4] != "FRANCE")) { $line = Nz($data[4]); } else { $line = Nz($data[5]); } } elseif ($j == 0) { # bases $align = " align=center"; $line = ""; if ($data[6] != 0) { $line .= "
Geneabank"; } if ($data[7] != 0) { $line .= "
Bigenet"; } $line = Nz(substr($line,4)); } else { $align = " align=center"; if ($text[$i] == 1) { $line = Nz($data[$j]); } else { $line = OuiNon($data[$j]); } } print(""); } print(""); } } } print("

".$champ[$j]."

".$line."

"); print("

".$nota); ?>