Programalama > HTML

Etiketler: webde, arama, motoru

Ort. 0
Puan ver:
<html>
<head>

</head>
  <table width='69' border='0' cellpadding='0' cellspacing='0' height="62"><tr>
    <td width='17' width='95' height="5" align="center" bordercolor="#008000"><center><b><font color='#333399'> 
      <p align="center">Arama </font></b></center></td></tr>
      <td width='95' align="center" height="5" bordercolor="#008000"><font color='#333399'><script>
      var MAX_ENGINES = 35;
 var tp='';
 var tpp='';
 var find = 'hunt';
 var hold=0;
 var hold2=0;
 var gog=0;
 var ap='';
 function MakeArray(n) {
 for (var i = 1; i <= n; i++) {
 this[i] = 0;
 }
 this.maxlen = n;
 this.len = 0;
 return this;
 }
 var engs = new MakeArray(MAX_ENGINES);
 function find_substring(needle, haystack) {
 var i, needlen = needle.length, haylen = haystack.length;
 for (i=0; i<=haylen-needlen; i++) {
 if (needle == haystack.substring(i,i+needlen))
 return i;
 }
 return false;
 }
 function Engine(name, opts, home, search) {
 var gotcha = find_substring(find, search);
 this.name = name;
 this.opts = opts;
 this.home = home;
 this.pre_gotcha = search.substring(0,gotcha);
 this.post_gotcha= search.substring(gotcha+find.length, search.length);
 }
 function Add(name, opts, home, search) {
 engs.len++;
 if (engs.len <= engs.maxlen) {
 engs[engs.len] = new Engine(name, opts, home, search)
 }
 else {
 alert ('Better increase MAX_ENGINES: ' + engs.Len + '>' + engs.maxlen)
 }
 }
 function DisplayForm() {
 document.writeln('<FORM Name=Gotchaform OnSubmit="HandleForm(this); return false">');
 document.writeln('<font face="Verdana" color="#000066" size: 1><INPUT size=22  name="query" >');
 document.writeln('<br><font face="Verdana" color="#000066" size: 1><SELECT name="service" >');
 for (i=1; i <= engs.len; i++) {
 document.writeln("<OPTION " + engs[i].opts + "> " + engs[i].name);
 }
 document.writeln('</SELECT> <input type=submit value=" Ara "  >');
 document.writeln('</FORM> ');
 document.Gotchaform.query.focus()
 }
 function HandleForm(form){
 var i, newq="", oldq=form.query.value;
 for (i=0; i<oldq.length; i++) {  // compress [ ]+ into +
 var thischar = oldq.charAt(i);
 if (thischar =="+")newq += "%2B";
 else
 if (thischar != ' ')
 newq += thischar;
 else if (lastchar != ' ')
 newq += '+';
 lastchar = thischar;
 }
 var eng = engs[1+form.service.selectedIndex];
  // Pencere
 search=window.open(newq ? eng.pre_gotcha + newq + eng.post_gotcha : eng.home,"SmartSearch","scrollbars=yes,toolbar=yes,location=yes,directories=yes,status=yes,menubar=yes,resizable=yes,width='100%',hight='100%'");
}Add("Google","","http://www.google.com/","http://www.google.com/search?hl=tr&safe=off&q=hunt&btnG=Google%27da+Ara&lr=");
Add("Netbul","","http://www.netbul.com/","http://kapi.netbul.com/internet/internet.asp?b=2&tr=&sayfa=1&keyword=hunt" );
Add("Arabul","","http://www.arabul.com/","http://www.arabul.com/sonuc.asp?SayfaNo=1&SayfaUzunlugu=10&DetayliArama=FALSE&SearchString=hunt");
Add("Arama","","http://www.arama.com/","http://www.arama.com/search.php3?q=hunt&weborcat=cat");
Add("Yahoo!","","http://www.yahoo.com/","http://search.yahoo.com/bin/search?p=hunt" );
Add("Kur'an'da","","http://www.kuranadaara.com/","http://www.kurandaara.com/index.php3?konu=ara&ne=1&keyword=hunt&kisi=01&sure_no=");
Add("Ftp'de","","http://www.oth.net","http://www.oth.net/s/s?q=hunt");
Add("Çoklu","","http://www.maximumedge.com/cgi/search/nph-cobrand.cgi?user=gezgin","http://www.maximumedge.com/cgi/search/nph-cobrand.cgi?user=gezgin&qry=hunt&module1=altavista&module5=fast&module4=findwhat&module6=google&module7=inktomi&module2=kanoodle&module8=searchhippo&module9=opendir&module3=7search&module10=yahoo");
Add("Domain","","http://www.gezginler.net/","http://www.gezginler.net/whois/domain.php?domain=hunt&action=checkdom&type=all");
Add("Program","","http://www.inndir.com/","http://www.inndir.com/ara.php?ara=hunt");
Add("Sürücü","","www.driversearch.com","http://www.driversearch.com/cgi/search.cgi?q=hunt&m=any");
Add("Resim","","http://www.picsearch.com/","http://www.picsearch.com/search.cgi?q=hunt&search=Search%21&rp=same&pl=en");
Add("Script","","http://www.hotscripts.com/","http://www.hotscripts.com/cgi-bin/search.cgi?bool=AND&query=hunt&category=all");
DisplayForm();
      </script>
            </table></div>
                         
                         </body></html>


Yorumlar                 Yorum Yaz
Bu hazır kod'a ilk yorumu siz yapın!
KATEGORİLER
ASP - 240
ASP.NET - 24
C# - 75
C++ - 174
CGI - 8
DELPHI - 247
FLASH - 49
HTML - 536
PASCAL - 246
PERL - 11
PHP - 160
WML - 9
XML - 2
Copyright © 2002 - 2024 Hazır Kod - Tüm Hakları Saklıdır.
Siteden yararlanırken gizlilik ilkelerini okumanızı tavsiye ederiz.
hazirkod.com bir İSOBİL projesidir.