[تمرين] برمجة اداة لجمع روابط التحميل من صفحات موقع

[محمد عبد العزيز]

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

مر زمن ولم يتم اقتراح تمرين بهذا القسم الذي اصابه الصدأ
تمرين برمجة اداة لجمع روابط التحميل من صفحات موقع
مثال تطبيقي: يعرف بعضكم موقع hiren.info لقرص الاقلاع BootCDالشهير
يحتوى الموقع كم كبير من الادواة المجانية للتحميل من الصفحة 1

كود :

http://www.hiren.info/downloads/freeware-tools/1

الى الصفحة 46

كود :

http://www.hiren.info/downloads/freeware-tools/46

تحتوى كل صفحة حوالي 10 برامج للتحميل بمجموع أكثر من 450 برنامج

من هنا جاء التمرين:
اكتب اداة تجمع لك روابط كل تلك البرامج بملف نصي بضغطة زر واحد
مدة التمرين ثلاث اسابيع (21 يوم)
لا حرج من طرح استفسار لمن لم يفهم التمرين

[o15s19]

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

أحببت المشاركة بهذا التمرين و هذا هو حلي بالمرفقات
الحل لم يجرب جيدا لأن النت عندي ضعيف جدا (Dailup) و بصعوبة فتحت الموقع و رفعت الحل

كما أن حلي بضغطتين و ليس بضغطة واحدة
سلامي

[syscall]

السلام عليكم

[o15s19]

السلام عليكم

تحسينات بسيطة لتصبح الاداة فعالة

[syscall]

السلام عليكم ورحمة الله وبركاته
الاصدار 1.1
البرنامج يعمل على اصدار 7 فمافوق

[محمد عبد العزيز]

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

o15s19 محاولة باستخدام OOP يعطي فقط روابط الصفحة الاولى ومنه فهو حل ناقص

syscall حل فعال باستخدام دالة جاهزة لاستخراج الروابط

كود :

http://delphi.about.com/od/internetintranet/a/extract-links-from-a-html-page-using-delphi.htm

من يزيد ؟

[o15s19]

يعطي فقط روابط الصفحة الاولى

لاحظت ذلك ايضا في حلي الأول و لكن الحل الثاني يعمل بدون مشاكل إلا مع الصقحة الثانية أي يقوم البرنامج يسحب جميع روابط الصفحة الأولى و لكن الصفحة الثانية لا يسحبها و لهذا يقوم بالانتظار طويلا لأن ReadTimeout مفتوح لذلك يتنظر حوالى 10-20 ثانية ثم ياود الاتصال برابط الصفحة الثالثة و عندها يقوم بسحب جميع روابط الصفحات أي يسحب كل الروابط ما عدا روابط الصفحة الثانية
جربه مرة ثانية و شكرا

[محمد عبد العزيز]

جربه مرة ثانية

تمت التجربة أكثر من مرة -15 دقيقية- ونفس النتيجة، روابط الصفحة الأولى فقط ويقوم بحفظ الملف

[o15s19]

تمت التجربة أكثر من مرة -15 دقيقية- ونفس النتيجة، روابط الصفحة الأولى فقط ويقوم بحفظ الملف

و أخيرا عرفت المشكلة
ببساطة عندما أقوم بعمل Clean لل Request الخاص IdHttp فإنه يرجع القيم الافتراضية لذلك تم تعديل الحل

و الأن هل الحل هكذا كامل
شكرا لك أخي الكريم

[محمد عبد العزيز]

الان اصبح يعمل بشكل صحيح
من التالي ؟