شبكة و منتديات تولف أن آر
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

كود كل محركات البحث في محرك واحد بشكل أختياري

3 مشترك

اذهب الى الأسفل

كود كل محركات البحث في محرك واحد بشكل أختياري  Empty كود كل محركات البحث في محرك واحد بشكل أختياري

مُساهمة من طرف essag الأحد يوليو 04, 2010 5:05 am

محركات بحث مدموجة مع بعض جاهزة للتركيب في الموقع:

الكود:
<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> <INPUT size=15 name="query">');
document.writeln('<strong></strong> <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="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>


نتمنى إفادتكم


essag
المدير‎ العام
المدير‎ العام

عدد المساهمات : 821
نقاط المنافسة : -2147477012
التقييم و الشكر : 4
تاريخ التسجيل : 05/03/2008
العمر : 29

https://zeba22.yoo7.com

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

كود كل محركات البحث في محرك واحد بشكل أختياري  Empty رد: كود كل محركات البحث في محرك واحد بشكل أختياري

مُساهمة من طرف الحلم الجديد الأحد أغسطس 22, 2010 9:06 pm

vالف شكر على الموضوووووووووووووووووووووووووع الرائع

اخى

الحلم الجديد الف شكر على الموضوووووووووووووووووووووووووع الرائع

اخى

الحلم الجديد

الحلم الجديد
عضو Golden
عضو Golden

عدد المساهمات : 1154
نقاط المنافسة : 4077
التقييم و الشكر : 0
تاريخ التسجيل : 05/08/2010
الموقع : مشرف مميز جدا وخبير فى بعض المنتديات المشهورة

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

كود كل محركات البحث في محرك واحد بشكل أختياري  Empty رد: كود كل محركات البحث في محرك واحد بشكل أختياري

مُساهمة من طرف علاء الدين السبت يناير 19, 2013 7:16 am

ممتن لك علي التعريف بالكود هذا

علاء الدين
عضو Golden
عضو Golden

عدد المساهمات : 5552
نقاط المنافسة : 51071
التقييم و الشكر : 1
تاريخ التسجيل : 13/01/2013

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

كود كل محركات البحث في محرك واحد بشكل أختياري  Empty رد: كود كل محركات البحث في محرك واحد بشكل أختياري

مُساهمة من طرف علاء الدين السبت يناير 19, 2013 7:17 am

كود ررررررررررررررررررائع حقا

علاء الدين
عضو Golden
عضو Golden

عدد المساهمات : 5552
نقاط المنافسة : 51071
التقييم و الشكر : 1
تاريخ التسجيل : 13/01/2013

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

الرجوع الى أعلى الصفحة

- مواضيع مماثلة

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