محركات بحث جميله وسهل تركيبها فى منتداك

ارسل الموضوع الجديد   رد على الموضوع

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

محركات بحث جميله وسهل تركيبها فى منتداك

مُساهمة من طرف hitman4 في الثلاثاء 18 سبتمبر - 12:47

:hhh:

انهارده جبتلكم كود يشمل 14 محرك بحث
:lol!:

وانشاء الله يعجبكم

مثال على الكود:

http://www.egyhitman.net/aINsCE-EIE-sEiiiN-aaYiIa-aaaUs-h13.html

الرمز:
<html dir="rtl">

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1256">
<title></title>
</head>

<body>

<script language="JavaScript"><!--
// 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('<FORM Name=Gotchaform OnSubmit="HandleForm(this); return false">');
document.writeln('<strong></strong>&nbsp;<INPUT size=15 name="query">');
document.writeln('<strong></strong>&nbsp;<SELECT name="service">');
for (i=1; i <= engs.len; i++) {
document.writeln("<OPTION " + engs[i].opts + "> " + engs[i].name);
}
document.writeln('</SELECT> &nbsp;<input type=submit value="Search"><br>');
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];
// 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("Alta Vista","SELECTED","http://altavista.digital.com/","http://altavista.digital.com/cgi-bin/query?pg=q&what=web&fmt=d&q=hunt");
Add("Yahoo!","","http://www.yahoo.com/","http://search.yahoo.com/bin/search?p=hunt" );
Add("DejaNews","","http://www.dejanews.com/","http://search.dejanews.com/nph-dnquery.xp?query=hunt&defaultOp=AND&svcclass=dncurrent&maxhits=25");
Add("HotBot","","http://www.search.hotbot.com","http://www.search.hotbot.com/search.html?MT=hunt&DC=25");
Add("Infoseek","","http://www.infoseek.com/Home?pg=Home.html&sv=A2","http://www.infoseek.com/Titles?qt=hunt&col=WW&sv=A2");
Add("Excite","","http://www.excite.com/","http://www.excite.com/search.gw?searchType=Concept&search=hunt&category=default");
Add("Lycos","","http://www.lycos.com/","http://www.lycos.com/cgi-bin/pursuit?query=hunt&backlink=639");
Add("Magellan","","http://www.mckinley.com/","http://www.mckinley.com/extsearch.cgi?query=hunt");
Add("OpenText","","http://search.opentext.com","http://search.opentext.com/omw/simplesearch?SearchFor=hunt&mode=and");
Add("WebCrawler","","http://webcrawler.com/","http://webcrawler.com/cgi-bin/WebQuery?searchText=hunt&maxHits=25");
// Software
Add("ZDNet Files","","http://www.zdnet.com/","http://www6.zdnet.com/cgi-bin/texis/swlib/hotfiles/search.html?Usrt=rel&Usrchtype=simple&Utext=hunt");
Add("Filez","","http://www.filez.com/","http://filez.com/cgi/filez.cgi?query=hunt&type=All+Files&hits=50&domain=World&doit=Search/");
Add("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("PC Gamer","","http://www.pcgame.com/","http://www.pcgame.com/finder/search.cgi?key=hunt");
// Denmark
DisplayForm();
// STOP HIDE
// --></script>

</body>

</html>

hitman4
 
 

الجنس:ذكرالدلوالثعبان
عدد المساهمات : 74
سجّل في : 27 يوليو 2007
العمر : 19
احترام قوانين المنتدى : http://i34.servimg.com/u/f34/11/14/55/92/111010.png
البلد : http://i29.servimg.com/u/f29/11/14/55/92/eg10.png

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: محركات بحث جميله وسهل تركيبها فى منتداك

مُساهمة من طرف زائر في الثلاثاء 18 سبتمبر - 14:00

شكرا جزيلا Smile

زائر
زائر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى