100) { return; } //---------------------------------------------------------- // create a string $s_dir containing the full current path. //---------------------------------------------------------- $s_dir=""; for ($c=0; $c<=$dir_depth; $c++) { $s_dir .= $cur_path[$c]; } //-------------------------------------------------------------------- // Open the directory, and read all the files from it one by one... //-------------------------------------------------------------------- $dhandle=opendir("$s_dir"); while ($file = readdir($dhandle)) { //------------------------------------------------- // Ignore the 'this' and 'parent' directory items //------------------------------------------------- if (($file!=".") && ($file!="..")) { //------------------------------------------------------------------------- // if the file is a regular file - check it for the search text. // Only check files with a .php extension - this is all there is on WB! //------------------------------------------------------------------------- if (is_file($s_dir.$file)) { $file_ext = substr($file, strlen($file)-3, 3); if ($file_ext == "htm") search_file($s_dir.$file); } //---------------------------------------------------------------------------------------- // if the file is a directory - add it to the current_path and call this function again. //---------------------------------------------------------------------------------------- elseif (is_dir($s_dir.$file)) { $cur_path[++$dir_depth] = ($file."/"); search_dir(); $dir_depth--; } } } } // End of function. //---------------------------------------------------------------- // Function: search_file() - searches a file for the search term //---------------------------------------------------------------- function search_file ($file) { global $cur_path, $dir_depth, $search_term, $results, $r_text, $r_title, $matches; //---------------------------------------------------------- // create a string $s_dir containing the full current path //---------------------------------------------------------- $s_dir=""; for ($c=0; $c<=$dir_depth; $c++) $s_dir .= $cur_path[$c]; //----------------------------------------------------------------------------------------- // Open the file, read it's contents into a variable $f_data. Create a lowercase version so // the search is case insensitive, then check that for the search term. //----------------------------------------------------------------------------------------- $f_size = filesize($file); $f_handle = fopen($file, "r"); $f_data = fread($f_handle, $f_size); //-------------------------------------------------------------------- // If the file contains 'SSIGNORE' - Don't Search it. This prevents // scripts and other non-content files from being searched. //-------------------------------------------------------------------- if ($text = strstr($f_data, 'SSIGNORE')) return; $f_dlc = strtolower($f_data); $t_text = ""; $in_tag = 0; if ($text = strstr(strip_tags($f_dlc), $search_term)) { $results[$matches] = $file; $text = substr($text, 0, 50); $text = str_replace ($search_term, "".$search_term. "", $text); $r_text [$matches] = "...". $text. "..."; $t_start = strpos ($f_dlc, "") + 7; $t_end = strpos ($f_dlc, ""); $r_title[$matches++] = substr($f_data, $t_start, $t_end-$t_start); } fclose($f_handle); } // End of function. ?> Bitte ein Suchbegriff eingeben!

"; } ?>

 
   Sitemap


Die Idee
LBV

Lebensraum Quelle
Ökologie
Fauna & Flora
Hydrologie
Geologie
Quelltypologie

Mythos Quelle


Quellbesuche

Quellschutz
   


Projektgebiete
Berchtesgaden
Sudelfeld
Adamello
Rabiusa

Quellkartierung

Quellnutzung

Galerien 

Materialien & Presse

Literaturverzeichnis
Pädagogikmaterialien
Wanderführer
Pressestimmen
Quelltypologie
Logo-download


Interaktiv 

Gästebuch

Kontakt
Kontaktformular
Impressum
Haftunsausschuss
Jugendschutz
Schutzrechtverletzung

 

Suche
Gästebuch
HOME
Suchen
Sie sind hier: Startseite Suche
 
 
Zähler
Cyber Computers Europe