Süper Kodlar
Süper Kod
  Arama Motoru Kodu
 
<script>

<!-- START HIDE

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('<CENTER><FORM Name=Gotchaform OnSubmit="HandleForm(this); return false">');

document.writeln('<table border=0 bordercolor=black width=325 bgcolor=#FFCC33><tr><td width="125"><b><font size=2 face="arial">Aranacak Kelime:</b></td>&nbsp;<td width="200"><INPUT size=25 name="query"></td></tr></table>');

document.writeln('&nbsp;<b><font size=2 face="arial">Nerede aranacak?</b>&nbsp;<SELECT name="service">');

for (i=1; i <= engs.len; i++) {

document.writeln("<OPTION " + engs[i].opts + "> " + engs[i].name);

}

document.writeln('</SELECT> <br><input type=submit value="Ara ve Bul"><br><a href="http://www.samsunspor.kulubu.com" target="http://www.samsunspor.kulubu.com" >http://www.samsunspor.kulubu.com</a><br>');

document.writeln('</FORM> </CENTER>');

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];

// Window

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("Dünya - AltaVista","SELECTED","http://altavista.digital.com/",

"http://altavista.digital.com/cgi-bin/query?pg=q&what=web&fmt=d&q=hunt");

Add("Dünya - AltaVista (UseNet)","","http://altavista.digital.com/",

"http://altavista.digital.com/cgi-bin/query?pg=q&what=news&fmt=d&q=hunt" );

Add("Dünya - Yahoo!","","http://www.yahoo.com/",

"http://search.yahoo.com/bin/search?p=hunt" );

Add("Dünya - DejaNews","","http://www.dejanews.com/",

"http://search.dejanews.com/nph-dnquery.xp?query=hunt&defaultOp=AND&svcclass=dncurrent&maxhits=25");

Add("Dünya - HotBot","","http://www.search.hotbot.com",

"http://www.search.hotbot.com/search.html?MT=hunt&DC=25");

Add("Dünya - Infoseek UltraSmart","","http://www.infoseek.com/Home?pg=Home.html&sv=A2",

"http://www.infoseek.com/Titles?qt=hunt&col=WW&sv=A2");

Add("Dünya - Excite","","http://www.excite.com/",

"http://www.excite.com/search.gw?searchType=Concept&search=hunt&category=default");

Add("Dünya - Infoseek (Usenet)","","http://www.infoseek.com",

"http://www.infoseek.com/Titles?qt=hunt&col=NN&sv=A2");

Add("Dünya - Lycos","","http://www.lycos.com/",

"http://www.lycos.com/cgi-bin/pursuit?query=hunt&backlink=639");

Add("Dünya - Magellan","","http://www.mckinley.com/",

"http://www.mckinley.com/extsearch.cgi?query=hunt");

Add("Dünya - OpenText","","http://search.opentext.com",

"http://search.opentext.com/omw/simplesearch?SearchFor=hunt&mode=and");

Add("Dünya - WebCrawler","","http://webcrawler.com/",

"http://webcrawler.com/cgi-bin/WebQuery?searchText=hunt&maxHits=25");

Add("Dünya - Yahoo (PixSearch)","","http://ipix.yahoo.com/",

"http://ipix.yahoo.com/cgi-bin/y-new/keyword_search.cgi?db=%2Fdata%2Fglobal_keyword&q=hunt");

// Software

Add("Yazılım - ZDNet","","http://www.zdnet.com/",

"http://www6.zdnet.com/cgi-bin/texis/swlib/hotfiles/search.html?Usrt=rel&Usrchtype=simple&Utext=hunt");

Add("Yazılım - DaveCentral","","http://www.davecentral.com/",

"http://www.davecentral.com/cgi-bin/search.pl?query=hunt");

Add("Yazılım - Filez","","http://www.filez.com/",

"http://filez.com/cgi/filez.cgi?query=hunt&type=All+Files&hits=50&domain=World&doit=Search/");

Add("Yazılım - Shareware.com","","http://www.shareware.com/",

"http://search.shareware.com/code/engine/Find?logop=and&cfrom=quick&orfile=True&hits=25&search=hunt&category=All-Categories");

Add("Yazılım - PC game finder","","http://www.pcgame.com/","http://www.pcgame.com/finder/search.cgi?key=hunt");

// Denmark

Add("Danimarka - AltaVista (DK)","","http://altavista.telia.com/cgi-bin/telia","http://www.danielsen.com/cgi/thornew.cgi?country=danmark&cnt=50&q=hunt");

Add("Danimarka - Jubii","","http://www.jubii.dk/","http://soeg.jubii.dk/resultat.asp?startnummer=1&antalresultater=30&soegeord=hunt");

Add("Danimarka - Thor","","http://www.danielsen.com/thor/",

"http://www.danielsen.com/cgi/thornew.cgi?country=danmark&cnt=50&q=hunt");

DisplayForm();

// STOP HIDE -->

</script>





<script language="JavaScript">
<!--

//
// Script by Jari Aarniala [www.mbnet.fi/~foo -- foo( at )mbnet.fi]
//

function startSearch(){
searchString = document.searchForm.searchText.value;
if(searchString != ""){
searchEngine = document.searchForm.whichEngine.selectedIndex + 1;
finalSearchString = "";

if(searchEngine == 1){
finalSearchString = "http://www.altavista.digital.com/cgi-bin/query?pg=q&what=web&fmt=.&q=" + searchString;
}
if(searchEngine == 2){
finalSearchString = "http://av.yahoo.com/bin/query?p=" + searchString + "&hc=0&hs=0";
}
if(searchEngine == 3){
finalSearchString = "http://www.excite.com/search.gw?trace=a&search=" + searchString;
}
if(searchEngine == 4){
finalSearchString = "http://www.hotbot.com/?SW=web&SM=MC&MT=" + searchString + "&DC=10&DE=2&RG=NA&_v=2&act.search.x=89&act.search.y=7";
}
if(searchEngine == 5){
finalSearchString = "http://www.infoseek.com/Titles?qt=" + searchString + "&col=WW&sv=IS&lk=noframes&nh=10";
}
if(searchEngine == 6){
finalSearchString = "http://www.lycos.com/cgi-bin/pursuit?adv=%26adv%3B&cat=lycos&matchmode=and&query=" + searchString + "&x=45&y=11";
}
if(searchEngine == 7){
finalSearchString = "http://netfind.aol.com/search.gw?search=" + searchString + "&c=web&lk=excite_netfind_us&src=1";
}

location.href = finalSearchString;
}
}


// -->
</script>

<basefont face="Verdana, Arial, sans-serif">

<form name="searchForm">

<table width=320 border cellpadding=3 cellspacing=2 bgcolor=444444>

<tr>
<td bgcolor=lightblue><font size=1 face="Verdana, Arial, sans-serif">Aranacak kelime:<br>
<td bgcolor=lightblue><font size=1 face="Verdana, Arial, sans-serif">Aranacak site:
<td bgcolor=lightblue>

<tr>
<td bgcolor=navajowhite><input style="background: dddddd" name="searchText" type="text">
<td bgcolor=navajowhite>
<select style="background: dddddd" name="whichEngine">
<option selected>Altavista
<option>Yahoo!
<option>Excite
<option>Hotbot
<option>Infoseek
<option>Lycos
<option>AOL Netfind
</select>
<td bgcolor=navajowhite><input type="button" value="ARA" onClick="startSearch()">

</select>
</table>
</form>
Aranacak kelime:
 Aranacak site:  

<b>JavaScript Arama Motoru</b><p>
Bu script ile bir defada en fazla  <br>
4 sitede arama yaptırabilirsiniz.
<form name="choose4" action="javascript:numChecked(document.choose4) //"><p>
<table><tr><td><b>Directories</b><br>
<input type="checkbox" name="check1" value="Yahoo"
onClick="choose4.check1.value='Yahoo'">Yahoo<br>
<input type="checkbox" name="check1" value="Magellan"
onClick="choose4.check1.value='Magellan'">Magellan<br>
<input type="checkbox" name="check1" value="Point"
onClick="choose4.check1.value='Point'">Point<br><br></td>
<td width="15"></td>
<td><b>Search Engines</b><br>
<input type="checkbox" name="check1" value="Alta"
onClick="choose4.check1.value='Alta'">Alta Vista<br>
<input type="checkbox" name="check1" value="Open"
onClick="choose4.check1.value='Open'">Open Text<br>
<input type="checkbox" name="check1" value="Lycos"
onClick="choose4.check1.value='Lycos'">Lycos<br>
<input type="checkbox" name="check1" value="Excite"
onClick="choose4.check1.value='Excite'">Excite<br></td>
<td><br><input type="checkbox" name="check1" value="Crawler"
onClick="choose4.check1.value='Crawler'">Webcrawler<br>
<input type="checkbox" name="check1" value="InfoSeek"
onClick="choose4.check1.value='InfoSeek'">InfoSeek<br>
<input type="checkbox" name="check1" value="DejaNews"
onClick="choose4.check1.value='DejaNews'">DejaNews<br>
<input type="checkbox" name="check1" value="Inktomi"
onClick="choose4.check1.value='Inktomi'">Inktomi<br> </td>
<td width="15"></td>
<td><b>Meta Searches</b><br>
<input type="checkbox" name="check1" value="MetaCrawler"
onClick="choose4.check1.value='MetaCrawler'">MetaCrawler<br>
<input type="checkbox" name="check1" value="SavySearch"
onClick="choose4.check1.value='SavySearch'">SavySearch<BR><br><br>
</td></tr></table><P>
<B>Aranacak kelimeyi girin</B>:<BR>
<input type="text" name="text" size=30>
<input type="submit" name="send" value="Ara">
</form> JavaScript Arama Motoru

Bu script ile bir defada en fazla
4 sitede arama yaptırabilirsiniz.

Directories
Yahoo
Magellan
Point		   Search Engines
Alta Vista
Open Text
Lycos
Excite
Webcrawler
InfoSeek
DejaNews
Inktomi		   Meta Searches
MetaCrawler
SavySearch

Aranacak kelimeyi girin:

<font face="Tahoma" size="2"><b>Bulunulan sayfa içinde arama

 <script language="JavaScript">
var NS4 = (document.layers); // hangi browser?
var IE4 = (document.all);

var win = window;
var n = 0;

function findInPage(str) {

var txt, i, found;

if (str == "e")
return false;

if (NS4) {

if (!win.find(str))
while(win.find(str, false, true))
n++;
else
n++;

if (n == 0)
alert("Aradığınız kelime sayfada bulunamadı.");
}

if (IE4) {
txt = win.document.body.createTextRange();

for (i = 0; i <= n && (found = txt.findText(str)) != false; i++) {
txt.moveStart("character", 1);
txt.moveEnd("textedit");
}

if (found) {
txt.moveStart("character", -1);
txt.findText(str);
txt.select();
txt.scrollIntoView();
n++;
}

else {
if (n > 0) {
n = 0;
findInPage(str);
}

else
alert("Aradığınız kelime sayfada bulunamadı.");
}
}

return false;
}

</script>

</b></font>

<form name="search" onSubmit="return findInPage(this.string.value);">
<font size=3><input name="string" type="text" size=15 onChange="n = 0;"></font>
<input type="submit" value=" Ara ">
</form>
<strong>ŞAİRLER</strong>  <br>
Ne gördükse iyi kötü<br>
Ömür biter biz hâlâ<br>
Söyleriz.<br>
<br>
Ne varsa şu dünyada<br>
Türlü görüntüler<br>
Gelsek de sonuna<br>
Söyleriz.<br>
<br>
Bazan boş günler<br>
Geçer birden dolunca<br>
Söyleriz.<br>
<br>
Ne biter<br>
Ne kalır geçmiş kitaplarda<br>
Ölümden sonra da<br>
Söyleriz.<br>

<strong>Behçet Necatigil </strong>

Bulunulan sayfa içinde arama
ŞAİRLER
Ne gördükse iyi kötü
Ömür biter biz hâlâ
Söyleriz.

Ne varsa şu dünyada
Türlü görüntüler
Gelsek de sonuna
Söyleriz.

Bazan boş günler
Geçer birden dolunca
Söyleriz.

Ne biter
Ne kalır geçmiş kitaplarda
Ölümden sonra da
Söyleriz.
Behçet Necatigil
 
  Bugün 7 ziyaretçi (52 klik) kişi burdaydı!
tracker



 
ANA SAYFAN YAP
 
Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol