function nullOptions(aMenu){

tot=aMenu.options.length;

if (aMenu.options.length>0)

for (i=0;i<tot;i++)

{

aMenu.options[i]=null

}

aMenu.options.length=0;

}

function MySearchF(){

nullOptions(document.F187.MySelect);

URLs=new Array()

titls=new Array()

Kwds=new Array()

URLs[0]="kontakt.htm";

titls[0]="Biura Wspólnoty 2000";

Kwds[0]="BIURA, WARSZAWA, KRAKÓW, MAPA, POZNAŃ, GDAŃSK, TAMARA, BELWEDERSKA, BUKOWSKA, BISKUPIA, BATOREGO, TELEFONY, EMAIL, E-MAIL, FAX, DOJAZD, ADRES,";

URLs[1]="index.htm";

titls[1]="Strona Główna";

Kwds[1]="BIURA, INFORMACJE, NIP, ATUTY, ";

URLs[2]="wizy_rosja.htm";

titls[2]="Wizy do Rosji";

Kwds[2]="WIZY, WIZA, DO, ROSJI, WIZA, ROSJA, CENNIK, POZNAŃ, WARSZAWA, AMBASADA, WIZY DO ROSJI, WIZA DO ROSJI, ";

URLs[3]="wizy_ik.htm";

titls[3]="Wizy do Innych Krajów";

Kwds[3]="WIZY, WIZA, DO, INNYCH, KRAJÓW, NADBAŁTYCKIE, KRAJE, BIAŁORUS, MONGOLIA, CHINY, ZJEDNOCZONE, EMIRATY, ARABSKIE, KAZACHSTAN, KUWEJT, WIZA DO INNEGO KRAJU, WIZA DO INNYCH KRAJÓW, ";

URLs[4]="wizy_voucher.htm";

titls[4]="Vouchery";

Kwds[4]="VOUCHER, VOUCHERY, WIZA, ";

URLs[5]="http://www.wspolnota2000.com.pl/ubezpieczenia.htm";

titls[5]="Ubezpieczenia";

Kwds[5]="UBEZPIECZENIA, UBEZPIECZENIE, LEXGARANT, SIGNAL, IDUNA, POLISA, WYJAZD, DELEGACJA, ";

URLs[6]="wizy_zaproszenia.htm";

titls[6]="Zaproszenia";

Kwds[6]="ZAPROSZENIA, ZAPROSZENIE, BIZNESOWE, POBYT, PRZEKROCZENIE, ";

URLs[7]="wizy_info.htm";

titls[7]="Wizy - Informacje Ogólne";

Kwds[7]="WIZY, WIZA, DO, ROSJI, ROSJA, CENNIK, AMBASADA, STAWKI, KONSULARNE, KONSULAT, WYMAGANIA, TURYSTYCZNA, TRANZYTOWA, BIZNESOWA, BIZNESS, OBCOKRAJOWCÓW, DOSTAWA, ZWYKŁA, DWUKROTNA, JEDNOKROTNA, ";

URLs[8]="visa_tur.htm";

titls[8]="Wiza Turystyczna";

Kwds[8]="WIZA TURYSTYCZNA, WIZY TURYSTYCZNE, ";

URLs[9]="visa_biz_w.htm";

titls[9]="Wiza Biznes Wielokrotna";

Kwds[9]="WIZA BIZNESOWA, WIZA BIZNESOWA WIELOKROTNA, WIZA WIELOKROTNA, WIZY WIELOKROTNE, ";

URLs[10]="visa_biz_d.htm";

titls[10]="Wiza Biznes Dwukrotna";

Kwds[10]="WIZA BIZNESOWA, WIZA BIZNESOWA DWUKROTNA, WIZA DWUKROTNA, WIZY DWUKROTNE, ";

URLs[11]="visa_tran.htm";

titls[11]="Wiza Tranzytowa";

Kwds[11]="WIZA TRANZYTOWA, TRANZYT, WIZY TRANZYTOWE, ";

URLs[12]="visa_zw_j.htm";

titls[12]="Wiza Zwykła Jednokrotna ";

Kwds[12]="WIZA ZWYKŁA, WIZA ZWYKŁA JEDNOKROTNA, WIZA JEDNOKROTNA, WIZY JEDNOKROTNE, ";


URLs[13]="visa_zw_d.htm";

titls[13]="Wiza Zwykła Dwukrotna ";

Kwds[13]="WIZA ZWYKŁA, WIZA ZWYKŁA DWUKROTNA, WIZA DWUKROTNA, WIZY DWUKROTNE, ";

URLs[14]="wizy_7.htm";

titls[14]="Wiza dla Obcokrajowców ";

Kwds[14]="WIZA DLA OBCOKRAJOWCÓW, VISA, WIZY DLA OBCOKRAJOWCÓW, FOREIGN, INTERNATIONAL, ENGLISH, ";

URLs[15]="wizy_7a.htm";

titls[15]="Visa ";

Kwds[15]="VISA, FOREIGN, INTERNATIONAL, ENGLISH ";


URLs[16]="cennik.htm";

titls[16]="Ceny wiz oraz opłat";

Kwds[16]="WIZY, WIZA, CENNIK, STAWKI, CENY, ZAPROSZENIE, VOUCHER, POSREDNICTWO, UBEZPIECZENIE, KURIER, ";

URLs[17]="http://www.wspolnota2000.com.pl/w_lotnicze.htm";

titls[17]="Wycieczki lotnicze";

Kwds[17]="TURYSTYKA, WYCIECZKI, WYCIECZKA, LOTNICZE, LOT, SAMOLOT, HISZPANIA, PORTUGALIA, MORZE, ";

URLs[18]="turystyka_wycieczki.htm";

titls[18]="Wycieczki autokarowe";

Kwds[18]="WYCIECZKI, WYCIECZKA, TOURY, TOUR, ROSJA, NADBAŁTYCKIE, INNE, KRAJE, KIERUNKI, CZAS, AUTOKAROWE, AUTOKAREM, ";

URLs[19]="http://www.wspolnota2000.com.pl/hotele.htm";

titls[19]="Hotele";

Kwds[19]="HOTELE, ESTONIA, BIAŁORU, NADBAŁTYCKIE, LITWA, ŁOTWA, FINLANDIA, ROSJA, UKRAINA, POLSKA, WARSZAWA, TALLIN, RYGA, KIJÓW, LWÓW, KOWNO, WILNO, MIŃSK, REZERWACJA, RECEPCJA, ";


URLs[20]="http://www.wspolnota2000.com.pl/hotele.htm";

titls[20]="Promocje Hotelowe";

Kwds[20]="HOTELE, PROMOCJE, SYLWESTER, BAL, PROMOCJE SYLWESTROWE, ";

URLs[21]="http://www.wspolnota2000.com.pl/bilety_l.htm";

titls[21]="Rezerwacja Biletów";

Kwds[21]="BILETY LOTNICZE, LOT, BILETY KOLEJOWE, KOLEJ, PKP, INTERCITY, TRANSYBERYJSKA, TRANS, SYBERYJSKA, KUP, BILETY NA PROM, PROM, AUTOKAR, BILETY AUTOKAROWE, ";

URLs[22]="http://www.wspolnota2000.com.pl/wakacje.htm";

titls[22]="Wycieczki egzotyczne";

Kwds[22]="WYCIECZKI, WYCIECZKA, TOURY, TOUR, EGZOTYKA, EGZOTYCZNE, KIERUNKI, CZAS, ";


URLs[23]="http://www.wspolnota2000.com.pl";

titls[23]="Wspólnota 2000";

Kwds[23]="WSPOLNOTA, WSPÓLNOTA, BIURO, KONTAKT, AGENT, TURYSTYKA, ";

URLs[24]="http://www.wspolnota2000.com.pl";

titls[24]="Wycieczki Polska";

Kwds[24]="POLSKA, WYPOCZYNEK, URLOP, TATRY, BAŁTYK, WYJAZD, ";

URLs[25]="http://www.wspolnota2000.com.pl/wycieczki_p.htm";

titls[25]="Rejsy Promowe";

Kwds[25]="PROM, PROMY, STATKI, WODA, MORZE, REJS, REJSY, WYCIECZKI, ";

URLs[26]="http://www.wspolnota2000.com.pl/lastm.htm";

titls[26]="Last Minute";

Kwds[26]="WYCIECZKI, LAST, MINUTE, OFERTY, WYJAZDY, SEZON, POZA, MORZE, AUTOKAR, BUS, LOTNICZE, SAMOLOT, WYJAZDY, WYPOCZYNEK ";

URLs[27]="http://www.wspolnota2000.com.pl/w_autokar.htm";

titls[27]="Wycieczki Autokarowe";

Kwds[27]="WYCIECZKI, OFERTY, AUTOKAR, BUS, ANGLIA, AUSTRIA, CZECHY, DANIA, FRANCJA, HISZPANIA, BALTYCKIE, LITWA, NIEMCY, ROSJA, NORWEGIA, RUMUNIA, SŁOWACJA, UKRAINA, WEGRY, WLOCHY, SZKOLNE ";

URLs[28]="http://www.wspolnota2000.com.pl/w_lotnicze.htm";

titls[28]="Wycieczki Lotnicze";

Kwds[28]="WYCIECZKI, OFERTY, LOTNICZE, LOT, ANGLIA, ARMENIA, AYSTALIA, CHINY, BALI, BRAZYLIA, DANIA, DOMINIKANA, EGIPT, ETIOPIA, FRANCJA, GRECJA, HAWAJE, INDIE, IZRAEL, JAPONIA, JORDANIA, KENIA, KOSTARYKA, KUBA, MALEDIWY, MALTA, MEKSYK, MOZAMBIK, NOWA ZELANDIA, PORTUGALIA, RPA, ROSJA, SESZELE, SRI, LANKA, TAJLANDIA, TURCJA, USA, UZBEKISTAN, WENEZUELA, WLOCHY, EMIRATY, ARABSKIE ";

URLs[29]="http://www.wspolnota2000.com.pl/w_moskwa.htm";

titls[29]="Wycieczki Rosyjskie (Moskwa, Ural, etc.)";

Kwds[29]="WYCIECZKI, OFERTY, LOTNICZE, LOT, ROSJA, MOSKWA, SANKT, ST, PETERSBURG, TRANSSYBERYJSKA, KOLEJ, BAJKAL, BAJKAŁ, URAL ";


/* ..... There are a lot of URLs, Keywords, Titles so I have just included the first set for one page */

var joined=new Array()

/* We start off a new array by joining together the titles and keywords */

/* ####################### Only the data above needs to be changed ####################### */

var joined=new Array()

{

for (i=0;i<URLs.length; i++){

joined[i]=titls[i]+Kwds[i]

}

Searchphrase=document.F187.MyText.value

j=0;

checker=0;

if (document.F187.MyText.value.length<1){

alert('Wpisz frazę do wyszukania.');

}

else {

var myFoundURL=new Array();

var myFoundText=new Array();

for (i=0;i<URLs.length; i++)

{

if (joined[i].indexOf(Searchphrase.toUpperCase())>-1){

checker+=1;

j++;

myFoundURL[j]=URLs[i];

myFoundText[j]=titls[i];

}

}

if (checker>0){

document.F187.MySelect.options[0]=new Option('Wyników: '+checker,' ')

for (j=1;j<checker+1;j++)

{

document.F187.MySelect.options[j]=

new Option(myFoundText[j],myFoundURL[j]); 

}

}

else {

document.F187.MySelect.options[0]=new Option('Nic nie znaleziono','') 

 

}

}

}

//Older Netscapes like a refresh, but Microsoft doesn't and nor does Net 7

/*if (navigator.appName.indexOf("Netscape")>-1)

history.go(0)*/

}



function searchGo(){

if (document.F187.MySelect.selectedIndex>0){

location=document.F187.MySelect.options[document.F187.MySelect.selectedIndex].value

}

else {

alert('Wybierz jedną z opcji')

}

}
