Gönderen Konu: Java ile Arama Motoru  (Okunma sayısı 1967 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı burajan

  • Web Programcısı
  • Administrator
  • *
  • İleti: 5109
  • Puan: 334
  • Cinsiyet: Bay
  • Web Programcısı
    • Burak ŞİMŞEK - Kişisel İnternet Sitesi
Java ile Arama Motoru
« : Ekim 08, 2006, 14:40:59 ÖS »
selamlar bulduğum javaları burda sizinle paylaşacağım
1) öncelikli kapsamlı bir arama motoru ee her siteye bir tane lazım
<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 = 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"><font size=2 face="arial">Aranacak Kelime:</td> <td width="200"><INPUT size=25 name="query"></td></tr></table>');

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

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

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

}

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

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("Yazilim - ZDNet","","http://www.zdnet.com/",

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

Add("Yazilim - DaveCentral","","http://www.davecentral.com/",

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

Add("Yazilim - Filez","","http://www.filez.com/",

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

Add("Yazilim - 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("Yazilim - 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>


Ekleyen: eXsTaSiS
« Son Düzenleme: Ekim 08, 2006, 23:34:57 ÖS Gönderen: burajan »
Konuyu Paylaş:
  delicious  facebook  twitter  google
Kişisel İnternet Sitem => buraksimsek.com.tr - http://www.buraksimsek.com.tr

Lütfen özel mesaj ile destek istemeyiniz. Önce forumda arama yapınız daha sonra forumda ilgili bölüme konu açınız.

Çevrimdışı semihsözer

  • İleti: 1
  • Puan: 0
-Java ile Arama Motoru
« Yanıtla #1 : Ekim 15, 2008, 19:20:27 ÖS »
ne olmuyoooooo >:( :'(

 

Benzer Konular

  Konu / Başlatan Yanıt Son İleti
4 Yanıt
3195 Gösterim
Son İleti Haziran 22, 2010, 21:44:21 ÖS
Gönderen: alex15617
5 Yanıt
4108 Gösterim
Son İleti Haziran 24, 2010, 15:51:55 ÖS
Gönderen: carello
0 Yanıt
1217 Gösterim
Son İleti Mart 03, 2009, 12:50:25 ÖS
Gönderen: GozyaSi
0 Yanıt
303 Gösterim
Son İleti Ocak 28, 2011, 17:56:26 ÖS
Gönderen: burajan
0 Yanıt
594 Gösterim
Son İleti Nisan 15, 2011, 20:49:20 ÖS
Gönderen: parazit0531