منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كيف اجعل البرنامج لا يتوقف عن محاولة تحميل ملف معين
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كيف اجعل البرنامج لا يتوقف عن محاولة تحميل ملف معين حتى لو تم فصل الانترنت يعني اريده يحاول حتى يتم ايقافه يدويا

يعني ان بدا بالتحميل ثم فجاة اضاء المصباح الاحمر الخاص بالانترنت فهذا يؤدي لتوقف البرنامج مظهرا رسالة فكيف اجعله ينتظر ولا يتخطى الملف.
طبعا الكود ضمن حلقة
for a = 0 to 100

next
استخدم هذه الطريقة
كود :
Dim DownloadCompleted As Boolean = False
        Do
            'Your code here

        Loop Until DownloadCompleted = True
الاكيد اني لم اوفق لشرح المشكلةSad

كيف اتخطى هذه المشكلة
بدلا من إظهار MESSAGEBOX قم بإظهار نص الرسالة على LABEL وباستخدام الكود السابق سوف يظل يكرر الكود حتى يتصل الإنترنت وسوف يختفى الخطأ
هل تقصد ان اضع جملة For ضمن جملة Do ؟؟

كود :
Dim DownloadCompleted As Boolean = False
        Do
            'Your code here
For a = 0 to 100
وهنا مزيج بين استخدام try واستخدام  on error resume next

next
        Loop Until DownloadCompleted = True
هناك ثلاث خطوات للتحميل
  1. تحميل الصور
  2. تحميل المرفقات
  3. تحميل ملفات جافاسكريبت
  4. تحميل ملفات css
ايضا ياليت طريقة التعامل مع اخطاء تحميل الملفات مثل خطا غير موجود 404 وخطا عدم الصلاحية وغيرها.
المشروع بعد انهائه باذن الله سارفعه ويكون افضل برمجة لي بمجال نسخ منتدى Mybb