Keyword = new Object();
 Address = new Object();
 Keyword[0] = 23
 /* 21 это количество позиций в базе, оно должно соответствовать количеству позиций в Вашей базе. */
 
Keyword[01] = "Главная страница сайта"  
Address[01] = "http://radio-electro.narod.ru/"

Keyword[02] = "Курс радиоэлектроники. Содержит уроки по радиоэлектроники и полезную справочную информацию. Ток, напряжение, сопротивление и закон Ома. Ответы на вопросы: Что такое электрический ток? Проводники, полупроводники и непроводники. Понятие сопротивления, напряжения."  
Address[02] = "http://radio-electro.narod.ru/kurs.htm"

Keyword[03] = "Основные сокращения в радиотехнической литературе."  
Address[03] = "http://radio-electro.narod.ru/kurs/sokr.htm"

Keyword[04] = "Полезные программы. Soft. Программа для расчетов сопротивлений добавочный резисторов резисторов для вольтметров, прогрмма для опредиления сопротивления проводов..."  
Address[04] = "http://radio-electro.narod.ru/soft.htm"

Keyword[05] = "Форум. Обсуждение вопросов, возможность задать вопрос или ответить на вопросы других учасников форума."
Address[05] = "http://narod.yandex.ru/userforum/?owner=radio-electro"

Keyword[06] = "Раздел телевидение, советы телемастерам. Ремонт и перестройка телевизоров."  
Address[06] = "http://radio-electro.narod.ru/tv.htm"

Keyword[07] = "Характеристики стандаритов телевизионного вещания. (D-K, B-G, M, N, KI, H, I, L."  
Address[07] = "http://radio-electro.narod.ru/tv/standart.htm"

Keyword[08] = "Что такое резистор? Постоянные и переменные резисторы, основные харктеристики резисторов."  
Address[08] = "http://radio-electro.narod.ru/kurs/3rez.htm"

Keyword[09] = "Что такое конденсатор? Принцип работы конденсатора. Основные характеристики конденсаторов."  
Address[09] = "http://radio-electro.narod.ru/kurs/4cond.htm"

Keyword[10] = "Перестройка телевизоров PAL на PAL-SECAM. Перестройка телевизоров, собранный на микросхемах TDA8361A, TDA8361B. Подключение и настройка транскодера."  
Address[10] = "http://radio-electro.narod.ru/tv/system.htm"

Keyword[11] = "Принципиальные схемы: Простейший генератор сигналов звуковой частоты. Простой усилитель мощности на TDA2003. Прибор для проверки керамических конденсаторов. Усилитель мощности на TDA2030. Детектор лжи..."  
Address[11] = "http://radio-electro.narod.ru/shemu.htm"

Keyword[12] = "О проекте. Как был создан сайт..."  
Address[12] = "http://radio-electro.narod.ru/proect.htm"

Keyword[13] = "Ссылки на другие сайты. Сайты с подобной тематикой, развлекательные сайты, сайты об автомобилях... Поставить свой баннер на этот сайт и другое."  
Address[13] = "http://radio-electro.narod.ru/sulku.htm"

Keyword[14] = "Написать письмо автору сайта."  
Address[14] = "mailto:voituk_yura@rambler.ru"

Keyword[15] = "Справочная информация по радиоэлектронике."  
Address[15] = "http://radio-electro.narod.ru/spravka.htm"

Keyword[16] = "Справочник по распостраненным транзисторам отечественного производства. Внешний вид транзисторов. Маркировка года и месяца выпуска"  
Address[16] = "http://radio-electro.narod.ru/spravka/osnov_tranzistor.htm"

Keyword[17] = "Цветовая маркировка номинальных сопротивлений и допусков резисторов."     
Address[17] = "http://radio-electro.narod.ru/spravka/color_rezistor.htm"

Keyword[18] = "Сокращения в радиоэлектронике."  
Address[18] = "http://radio-electro.narod.ru/spravka/sokr.htm"

Keyword[19] = "Cокращения и термины в импортных схемах, литературе."  
Address[19] = "http://radio-electro.narod.ru/spravka/sokr_import.html"

Keyword[20] = "Возможная замена импортных транзисторов (500 типов транзисторов)"  
Address[20] = "http://radio-electro.narod.ru/spravka/zamena_tranzistor.htm"


Keyword[21] = "Операционные усилители и их аналоги. Функциональное назначение операционых усилителей. Возможная замена импортных операционных усилителей отечественными аналогами."  
Address[21] = "http://radio-electro.narod.ru/spravka/zamena_OU.htm"

Keyword[22] = "Любые объявления, которые каким-то образом связанные с радиоэлектроникой, например о покупке или продажи радиоаппаратуры, приборов, инструментов, а также по поиску и предложению услуг в этой сфере. "
Address[22] = "http://radio-electro.narod.ru/objavl.htm"

Keyword[23] = "Гостевая книга сайта. Замечания и пожелания."  
Address[23] = "http://xbase.ru/?gupic"

 function contains(sub,s){
 strlen1=sub.length
 strlen2=s.length
 istrue=false
 for(i=0;i<=strlen2;i++)
 {
 comp=s.substring(i-1,strlen2)
 comp=comp.substring(0,strlen1)
 if(comp==sub){
 istrue=true
 break  
    }   
   }
 return istrue
  }

 function dolt() {
 loopCount=0;
 var Found=false
 var Item=document.forms[0].sub.value.toLowerCase();
 
stats='toolbar=no,location=no,scrollbars=yes,directories=no,status=yes,menubar=no,height=400,width=600,top=0,left=0'
stats += 'scrollbars=yes,resizable=yes'
MsgBox = window.open ("","msgWindow",stats) 
MsgBox.opener = window;
MsgBox.opener.name = "opener";
MsgBox.document.write("<head><title>Результат поиска: "+Item+"</title></head><body bgcolor='#D3E3E1' text='#660099' link='#000000' alink='#CC6633' vlink='#000000'>");

 if(document.form1.sub.value=="")
 MsgBox.document.write('<h5><font face="Comic Sans MS">Результат поиска:<font color="Red"> всех записей базы</font><HR></h5></font>');
 else
 MsgBox.document.write('<h5><font face="Comic Sans MS">Результат поиска: '+Item+'<HR color="#6666FF"></h5></font>');
for(var i=1; i<=Keyword[0]; i++){
contains(Item,Keyword[i].toLowerCase()) 
if(comp==Item) {
loopCount++;
Found=true;
MsgBox.document.write('<div align="center"><center><table border="0" width="100%" cellspacing="0" cellpadding="8"><tr><td width="2%" height="18" align="center"><font face="Comic Sans MS" size="2" color="#CC3366"><h5>'+loopCount+'. </h5></font></td><td width="150%" height="18" align="left"><font color="#000000"></font><font><font face="Comic Sans MS" size="2" color="#ff0000"><A HREF='+Address[i]+' target="_blank">'+Keyword[i]+'<BR></A></font></h1></font></td></tr></table></center></div>')
  MsgBox.document.write('<script Language="JavaScript">window.status=("Всего найдено '+loopCount+' ")</'+'script'+'>');

     }
  }

if(!Found)
MsgBox.document.write('<font face="Comic Sans MS" size="3" color="#FF0000">К сожелению по Вашему запросу небыло найдено ни одного документа.</font>')
MsgBox.document.write('<style type="text/css"><!-- @import ../style1.css; A:link{text-decoration:none} A:visited { text-decoration:none} --></style></body>')
// Импорт и указание стилей, закрытие тела документа.
if(loopCount==0){
MsgBox.document.write('<script Language="JavaScript">window.status=("По данному запросу ничего найдено")</'+'script'+'>');
      }
    }