إعـــــــلان

تقليص
لا يوجد إعلان حتى الآن.

طريقة استخلاص رابط تحميل مباشر

تقليص
هذا الموضوع مغلق.
X
X
 
  • تصفية - فلترة
  • الوقت
  • عرض
إلغاء تحديد الكل
مشاركات جديدة

  • #16
    المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة
    ممكن كتابة رابط لملف صغير الحجم على هذا المركز
    للتجربة عليه

    نفس الصورة

    http://www.mediafire.com/view/23unknnowppdbl7/535.bmp

    تعليق


    • #17
      المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة
      شكرا لكم جميعا على المرور الطيب
      ---------------------

      أخي ياسر
      بعد تدعيم البرنامج بميزة المسؤولية هل تم تحميل الصورة للقرص c ؟

      شكرا
      --------------
      نعم استاذي
      تم التحميل
      موفق بإذن الله ... لك مني أجمل تحية . موفق بإذن الله ... لك مني أجمل تحية .

      تعليق


      • #18
        السلام عليكم ورحمة الله وبركاته
        المشاركة الأصلية بواسطة عبود عبود مشاهدة المشاركة
        للتعامل مع مركز الميديا فير

        انسخ الرابط في المشاركة 16 أعلاه
        ألصقه في أنبوت1

        كود زر تنفيذ التحميل من مركزmediafire
        كود PHP:
        Math.Random(11000);
        =Input.GetText("Input1");
        Replace1 =  String.Replace(t"#"""false);
        =  String.Replace(Replace1"view""download"false);
        HTTP.Submit(""..f, {}, SUBMITWEB_GET2080nilnil)
        String.Find(n'kNO ='1false);
        if 
        ~=-1 then
        ---------------------------------------------------------
        String.Find(n'kNO = "http'1false);
        b1 String.Mid(nv+7,String.Length(n));
        v2 String.Find(b1'"'1false);
        lien String.Mid(nv+7,v2-1);
        -----------------------------------------------------------
        lahi String.Mid(lienString.Length(lien)-3,4);
        HTTP.Download(lien"C:\\"..y..lahiMODE_BINARY2080nilnilnil);
        Dialog.Message("هااااااااااااااااااااام""اكتمل  تحميل  الملف");
        end 
        سلالالالالالام

        تعليق


        • #19
          اخي ثامر ماشاء الله عليك والله لاعرف ماأقول ابداعاتك ليس لها مثيل

          وسأقوم بتعديل الكود حتي يقوم المستخدم بتحديد اسم ومكان حفظ الملف الذي يحملة

          تعليق


          • #20
            المشاركة الأصلية بواسطة احمد حاتم احمد مشاهدة المشاركة

            وسأقوم بتعديل الكود حتي يقوم المستخدم بتحديد اسم ومكان حفظ الملف الذي يحمله
            بارك الله فيك بالتوفيق إن شاء الله

            إقتراح : أن تدرس عدة مراكز تحميل شهيرة و كيفية استخلاص لكل منها رابط التحميل
            المباشر بعدها تربط الأكواد بدالة شرطية لما سيكتب في الأنبوت المخصص لرابط التحميل
            بحيث يربط ناتج البحث عن اسم المركز في الانبوت بتنفيذ الكود الخاص بذلك المركز اذ لم يكن
            موجود تظهر رسالة للمستخدم بأن البرنامج مازال لايدعم المركز المكتوب على أن يدرج في نسخ أخرى .

            تعليق


            • #21
              شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .
              موفق بإذن الله ... لك مني أجمل تحية .

              تعليق


              • #22
                المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة
                إقتراح : أن تدرس عدة مراكز تحميل شهيرة و كيفية استخلاص لكل منها رابط التحميل
                المباشر بعدها تربط الأكواد بدالة شرطية لما سيكتب في الأنبوت المخصص لرابط التحميل
                بحيث يربط ناتج البحث عن اسم المركز في الانبوت بتنفيذ الكود الخاص بذلك المركز اذ لم يكن
                موجود تظهر رسالة للمستخدم بأن البرنامج مازال لايدعم المركز المكتوب على أن يدرج في نسخ أخرى .
                والله اخي فكره اكثر من رائعة ولها طرق عديده ساقوم بعمل الفكرة ثم رفع الملف المتوح

                لكن بعد ان انتهي من برنامج التحميل للروابط المباشرة فقط

                تعليق


                • #23
                  المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة
                  إقتراح : أن تدرس عدة مراكز تحميل شهيرة و كيفية استخلاص لكل منها رابط التحميل

                  المباشر بعدها تربط الأكواد بدالة شرطية لما سيكتب في الأنبوت المخصص لرابط التحميل

                  بحيث يربط ناتج البحث عن اسم المركز في الانبوت بتنفيذ الكود الخاص بذلك المركز اذ لم يكن

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


                  اخي ثامر لقد حاولت مع 4shared وقد نجحت الطريقة جلبت الرابط بدون الانتظار 20 ثانية وذلك عند الضغط علي فحص

                  العنصر اجد الرابط المباشر حاولت ان اجعل الطريقة تعمل مع الاوتوبلاي لكن يظهر لي هذا الكود "Could not open request."

                  وهذا هو الكود لدي 4shared
                  كود:
                  y = Math.Random(1, 1000); 
                  t =Input.GetText("Input1"); 
                  Replace1 = String.Replace(t, "#", "", false); 
                  f = String.Replace(Replace1, "file", "get", false); 
                  n = HTTP.Submit(""..f, {}, SUBMITWEB_GET, 20, 80, nil, nil) 
                  h = String.Find(n, 'name=', 1, false); 
                  if h ~=-1 then 
                  --------------------------------------------------------- 
                  v = String.Find(n, 'value="http://dc370.4shared.com/download/', 1, false); 
                  b1 = String.Mid(n, v+7, String.Length(n)); 
                  v2 = String.Find(b1, '"', 1, false); 
                  lien = String.Mid(n, v+7,v2-1); 
                  ----------------------------------------------------------- 
                  lahi = String.Mid(lien, String.Length(lien)-3,4); 
                  HTTP.Download(lien, "C:\\"..y..lahi, MODE_BINARY, 20, 80, nil, nil, nil); 
                  Dialog.Message("", ""); 
                  end
                  ولكن لحظة الكود يعمل مع ملفات ال exe فقط بسبب كلمة file

                  ويمكن تجربة هذا الرابط للتحميل

                  كود:
                  http://www.4shared.com/file/BHJjqxIV/WinRAR.html
                  والسلام عليكم ورحمة الله وبركاته
                  التعديل الأخير تم بواسطة احمد حاتم احمد; الساعة 05-08-2015, 06:59 PM.

                  تعليق


                  • #24
                    وهذا كود ميديا فاير لجعل المستخدم يحدد اسم ومكان حفظ الملف

                    عند ظهور dialog الحفظ اكتب الاسم فقط لاتكتب الامتداد

                    اختر فقط من الامتدادات الوجودة


                    كود:
                    y = Math.Random(1, 1000); 
                    t =Input.GetText("Input1"); 
                    Replace1 =  String.Replace(t, "#", "", false); 
                    f =  String.Replace(Replace1, "view", "download", false); 
                    n = HTTP.Submit(""..f, {}, SUBMITWEB_GET, 20, 80, nil, nil) 
                    h = String.Find(n, 'kNO =', 1, false); 
                    if h ~=-1 then 
                    --------------------------------------------------------- 
                    v = String.Find(n, 'kNO = "http', 1, false); 
                    b1 = String.Mid(n, v+7,String.Length(n)); 
                    v2 = String.Find(b1, '"', 1, false); 
                    lien = String.Mid(n, v+7,v2-1); 
                    ----------------------------------------------------------- 
                    lahi = String.Mid(lien, String.Length(lien)-3,4);
                    path_save = Dialog.FileBrowse(false, "اكتب اسم الملف فقط", _DesktopFolder, "Files (.rar)|*.rar|(.exe)|*.exe|(.iso)|*.iso|(.apz)|*.apz|(.text)|*.txt|(.mp3)|*.mp3|(.mp4)|*.mp4|", "", "", false, false);
                    if path_save[1] ~= "CANCEL" then
                    HTTP.Download(lien, path_save[1], MODE_BINARY, 20, 80, nil, nil, nil); 
                    Dialog.Message("???????????????????????", "?????  ?????  ?????"); 
                    end  
                    end

                    تعليق


                    • #25
                      موفق بإذن الله ... لك مني أجمل تحية .

                      تعليق


                      • #26
                        مشكوووووووووووووووووووووو وووور

                        تعليق


                        • #27
                          موفق بإذن الله ... لك مني أجمل تحية .

                          تعليق


                          • #28
                            شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

                            تعليق


                            • #29
                              موفق بإذن الله ... لك مني أجمل تحية .

                              تعليق


                              • #30
                                تحياتى مجددا

                                تعليق

                                مواضيع تهمك

                                تقليص

                                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 06-08-2025 الساعة 11:33 PM
                                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 06-04-2025 الساعة 05:29 PM
                                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 05-31-2025 الساعة 10:07 PM
                                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 05-30-2025 الساعة 11:48 PM
                                المنتدى: التصنيع والانتاج نشرت بواسطة: HaMooooDi الوقت: 05-30-2025 الساعة 09:36 AM
                                يعمل...
                                X