Wyszukiwarka .txt, która ma za zadanie wyszukać odpowiednie pod strony serwisu.

Oto moja propozycja takiej wyszukiwarki, bez wykorzystania bazy danych SQL.

<?php

/*=================================*\

  Skrypt: Mini wyszukiwarka .txt
  Autor: As
  URL: http://www.Twoja-Strona.Net
  
\*==================================*/


$wyraz = $_POST['wyraz']; // szukana fraza
$sort = $_POST['sort'];

echo'<form method="POST">Szukaj: '
       .'<input typr="text" name="wyraz" value="'.$wyraz.'"> '
       .'Sortuj <select name="sort">'
       .'<option value="1" selected>Rosnąco</option>'
       .'<option value="0">Malejąco</option>'
       .'</select> '
       .'<input type="submit" value="OK">'
       .'</form>';

/*======================================================================================================*\

  $tablica składnia ('słowa kluczowe oddzielone przecinkami' => 'kod html z linkiem do podstrony');
  $max = maksymalna ilość wyników (200);    

\*======================================================================================================*/

$tablica = array('php, inne słowo kluczowe, generator,' => '(Generator PHP do kolorowania składni php) <a href="http://php.twoja-strona.net">PHP generator</a>', 
                    'php, html, biblioteka' => '(Biblioteka TS, bogata w treść) <a href="http://twoja-strona.net/html/Biblioteka.html">Biblioteka TS</a>', 
                    'TS, twoja-strona, twoja strona' => '(Ulubiona strona) <a href="http://twoja-strona.net">Twoja-Strona.Net</a>',
                    'php, twoja-strona, twoja strona' => '(PHP: Benchmark) <a href="http://twoja-strona.net/html/Biblioteka_Art381.html">Przeprowadzanie testów wydajności</a>'
                    );

$max = 200;


if (isSet($wyraz) && $wyraz != "")
{
   if ($sort == 1)
   {
      natsort($tablica);
      $sortowanie = "(Sortowanie: <b>Rosnąco</b>)";
   }
   else
   {
      arsort($tablica);
      $sortowanie = "(Sortowanie: <b>Malejąco</b>)";
   }
   

   $i = 1;

   echo "Szukana fraza: <b>".$wyraz."</b> ".$sortowanie."<br><hr>"; 

   foreach ($tablica as $slowo => $url) 
   {
      if (@eregi(quotemeta($wyraz), $slowo)) 
      {
         echo $i."). ".$url."<br>";
         $tak = true;
         ++$i;
         if (($i-1) == $max)
         {
            break;  
         } 
      }  
   }

   if (!$tak)
   {
      echo "Brak wyników wyszukiwania...";  
   }
}

?>

Pobierz Skrypt

Autor: As

Prawa autorskie © . Wszelkie Prawa Zastrzeżone.

Opublikowane: 2006-01-31 (492 odsłon)