النتائج 1 إلى 8 من 8

الموضوع: سكريبت البحث في الإنترنت ؟؟

  1. #1
    عضو نشيط
    تاريخ التسجيل
    Jan 2002
    المشاركات
    226

    سكريبت البحث في الإنترنت ؟؟



    السلام عليكم ورحمة الله وبركاته ..

    لطالما بحثت وتمنيت مثل هذا السكريبت ولكنني حاولت جاهداً ولم أستطع عمله وحاولت في البحث عنه ولم أجده أيضاً !!
    وفكرة هذا السكريبت تقوم على أساس جلب النتائج من مواقع أخرى , وأعني بالنتائج أي نتائج البحث !
    إنه محرك بحث عشوائي في الإنترنت يقوم بجلب نتائج البحث من محرك كجوجل مثلاً أو ياهو ..

    أو أن يكون محرك البحث هذا يعتمد على الميتا تاج الموجوده في المواقع فيقوم بجلب النتائج عشوائياً كمحرك البحث جوجل في البحث في الويب أتمنى ممن لديه هذا المحرك أن يقوم بوضعه هنا ..

    تقبلوا خالص التحيه ..





    __________________
    إعمل لله وستجني حب الله ...

    وحيد حزين - sad alone
    sad alone غير متواجد حالياً


  2. #2
    عضو نشيط جدا
    تاريخ التسجيل
    Jan 2002
    المشاركات
    581


    < سلام >

    أخي sad alone :
    هذا البرنامج يقوم بالبحث في أغلب محركات البحث العالمية ويظهر النتائج في موقعك , وهو نفسه المستخدم في موقع بوابة العرب :
    http://www.arabsgate.com/cgi-bin/search/metasearch.cgi
    وهذا البرنامج يملك مميزات كثيرة وعديدة ويمكن تنزيل إضافات من موقعه .
    ----

    أرجوا أن يلبي حاجتك .

    < / سلام >





    الملفات المرفقة الملفات المرفقة
    __________________
    President Bashar Al Assad
    SyrNet.net
    WSyria.com , Comming Soon
    Syria Nobles
    Al Golan
    Syrian Computer Society
    Ministry of Tourism - Syria
    E-mail : syria@wsyria.com
    ---------------------------------------------------
    بحبك ... وما بحب حدا غيرك يا سوريا
    كلنا نشهد بأن لا اله إلا الله الواحد الأحد
    Syria com غير متواجد حالياً

  3. #3
    عضو نشيط
    تاريخ التسجيل
    Jan 2002
    المشاركات
    226

    أخي العزيز Syria com



    فعلا هذا هو ما أردته ..
    كل الشكر لك أخي العزيز ..

    ولكنني عندما أقوم بتنزيل السكريبت يقرأه المتصفح ملف txt وليس zip
    أرجو أن تقوم بإرساله الى بريدي jameel85@hotmail.com
    إن لم أكن قد أثقلن عليك ..

    وإن كان لديك سكريبت مشابه له ولكن php أتمنى إرساله أيضا ..

    تقبل خالص تحياتي ..





    __________________
    إعمل لله وستجني حب الله ...

    وحيد حزين - sad alone
    sad alone غير متواجد حالياً

  4. #4
    عضو نشيط جدا
    تاريخ التسجيل
    Jan 2002
    المشاركات
    581


    < سلام >

    أخي أكيد أن المتصفح سيقرأ الملف على هيئة txt لأني قمت بتحويله حتى أستطيع تحميله . فقط قم بإعادة تسمية الملف وغحذف txt. من نهايته وسيقوم الجهاز بفتحه كملف مضغوط عادي .

    < / سلام >





    __________________
    President Bashar Al Assad
    SyrNet.net
    WSyria.com , Comming Soon
    Syria Nobles
    Al Golan
    Syrian Computer Society
    Ministry of Tourism - Syria
    E-mail : syria@wsyria.com
    ---------------------------------------------------
    بحبك ... وما بحب حدا غيرك يا سوريا
    كلنا نشهد بأن لا اله إلا الله الواحد الأحد
    Syria com غير متواجد حالياً

  5. #5
    عضو نشيط جدا
    تاريخ التسجيل
    Jan 2002
    المشاركات
    581


    < سلام >

    بالنسبة لتوفر سكربت php يقوم بالعمل فيوجد واحد لكن دون تصميم .

    قم بنسخ هذا الكود وضمّنه في أي ملف php :

    سأقوم بوضع الكود بشكل نص عادي بسبب مشكلة الخروج عن إطار الصفحة :

    <?

    print "
    <HTML>
    <HEAD>
    <TITLE>Meta بحث Engine</TITLE>
    </HEAD>

    <BODY>

    <font face=Verdana,Arial,Helvetica,sans-serif size=-1>
    <FORM method=get>
    بحث: <input type=text name=search><input type=submit name=بحث value=إبحث><br>
    </FORM>
    <hr size=1 noshade>";

    #- Start search
    if($search) {

    $q = urlencode($search);

    $start = time();

    $eng[0]['url'] = "http://www.google.com/search?q=$q&hl=en&lr=&safe=off&start=0&sa=N";
    $eng[0]['name'] = "Google";
    $eng[0]['reg'] = "/<p><A HREF=(.*?)>(.*?)<\/A><font.*?<br>(.*?)<br>/";
    $eng[0]['strip'] = "\n";

    $eng[1]['url'] = "http://www.alltheweb.com/search?cat=web&lang=any&query=$q";
    $eng[1]['name'] = "AllTheWeb";
    $eng[1]['reg'] = '/<dt>.*?href=\"(.*?)\">(.*?)<\/a>.*?<dd>(.*?)<br>/i';
    $eng[1]['strip'] = "\n";

    $eng[2]['url'] = "http://altavista.com/sites/search/web?q=$q&enc=&kl=XX&search=بحث";
    $eng[2]['name'] = "Altavista";
    $eng[2]['reg'] = "/<A .*?status='(.*?)'.*?\">(.*?)<\/A>.*?<BR>(.*?)<BR>/i";
    $eng[2]['strip'] = "\n";

    $eng[3]['url'] = "http://search.msn.com/results.asp?ba=(0.0)0&co=(0.10)4.1..2.1.4.1&FORM=MSNH&RS=CHECKED&q=$q&v=1";
    $eng[3]['name'] = "MSN";
    $eng[3]['reg'] = "/<A CLASS.*?href=\"(.*?)\">(.*?)<\/A><br.*?>(.*?)<br/i";
    $eng[3]['strip'] = "";

    $eng[4]['url'] = "http://search.excite.com/search.gw?c=web&search=$q&onload=";
    $eng[4]['name'] = "Excite";
    $eng[4]['reg'] = "/pos=.*?;(http.*?)onMouse.*?<b>(.*?)<br>.*?size8>(.*?)<\/span>/i";
    $eng[4]['strip'] = "\n";

    $eng[5]['url'] = "http://google.yahoo.com/bin/query?p=$q&hc=1&hs=4";
    $eng[5]['name'] = "Yahoo";
    $eng[5]['reg'] = "/href.*?\*(.*?)\">(.*?)<br>.*?<\/b>(.*?)<br>/i";
    $eng[5]['strip'] = "\n";

    $urls = array();
    $out = array();
    $y=0;

    foreach($eng as $c)
    {
    $text1 = join("",file($c['url']));

    if($c[strip])
    $text1 = ereg_replace($c[strip],"",$text1);

    preg_match_all($c['reg'],$text1,$matches);
    $num = count($matches[0]);

    for($x=0;$x<$num;$x++) {
    $url = strip_tags($matches[1][$x]);
    $title = strip_tags($matches[2][$x]);
    $description = strip_tags($matches[3][$x]);
    $engine = $c[name];

    if($out["$url"])
    {
    $out["$url"][engine] .= ", $engine";
    }
    else
    {
    $out["$url"][title] = $title;
    $out["$url"][description] = $description;
    $out["$url"][engine] = $engine;
    }
    $y++;
    }

    }#rof

    $secs = time() - $start;

    print "$y results returned in $secs seconds.<br><br>";
    print "<OL>";
    #print "<pre>";
    #print_r($out);
    #print "</pre>";

    while(list($url,$rec) = each($out))
    {
    extract($rec);
    print "
    <li>
    <a href=$url><b>$title</b></a><BR>
    $description
    <FONT size=1><BR>$url<br></FONT>
    <FONT size=1 color=green>$engine</FONT>
    <BR><BR>";
    }

    print "</OL>";

    print "
    </font>
    </BODY>
    </HTML>
    ";
    } #end search

    ?>



    ---------

    وهو لا يتعدى كونه فورم مؤلفة من مساحة نصية وزر للإدخال .
    أرجوا أن يلبي حاجتك .

    < / سلام >





    __________________
    President Bashar Al Assad
    SyrNet.net
    WSyria.com , Comming Soon
    Syria Nobles
    Al Golan
    Syrian Computer Society
    Ministry of Tourism - Syria
    E-mail : syria@wsyria.com
    ---------------------------------------------------
    بحبك ... وما بحب حدا غيرك يا سوريا
    كلنا نشهد بأن لا اله إلا الله الواحد الأحد
    Syria com غير متواجد حالياً

  6. #6
    عضو نشيط
    تاريخ التسجيل
    Jan 2002
    المشاركات
    226

    مشكور أخوي ...



    نزلت الملف وتقبل مني خالص التحيه .........

    شووووووكرن





    __________________
    إعمل لله وستجني حب الله ...

    وحيد حزين - sad alone
    sad alone غير متواجد حالياً

  7. #7
    عضو سوبر نشيط
    تاريخ التسجيل
    Jul 2001
    المشاركات
    668


    مشكور اخ Syria com على البرنامج







    ثانك يو





    __________________
    * عش ما شئت فإنك ميت . وأحبب من شئت فأنك مفارقة , وأعمل ما شئت فأنك مجازى بة

    * ما فائدة القلم اذا لم يفتح فكرا ..أو يضمد جرحا ..أو يرقا دمعة ..أو يطهر قلباً ..أو يكشف زيفاً .. أو يبني صرحاً يسعد الأنسان في ضلالة
    faleh2002 غير متواجد حالياً

  8. #8
    عضو فعال
    تاريخ التسجيل
    Nov 2002
    المشاركات
    1,231


    لا تدور ولا تحتار
    في سوالف كل شي موجود

    دورت في hotscripts و ضيعت بس هنا على طول لقيت طلبي


    ** رفع للفائدة





    __________________
    نحوَ سوالف أفضل
    عبدالكريم ابو السعود غير متواجد حالياً





ضوابط المشاركة

  • لا تستطيع إضافة مواضيع جديدة
  • لا تستطيع الرد على المواضيع
  • لا تستطيع إرفاق ملفات
  • لا تستطيع تعديل مشاركاتك
  •  

أضف موقعك هنا| اخبار السيارات | حراج | شقق للايجار في الكويت | بيوت للبيع في الكويت | دليل الكويت العقاري | مقروء | شركة كشف تسربات المياه | شركة عزل اسطح بالرياض | عزل فوم بالرياض| عزل اسطح بالرياض | كشف تسربات المياة بالرياض | شركة عزل اسطح بالرياض