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

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

استخدمت مكتبة twain وكلاس مجاني الكود يعمل ويسح الملف في حالة اتصال الماسح الضوئي ولكن في حالة عدم اتصالة او فصلة وتركيبة والضغط علي بوتن السحب يتوقف البرنامج كلة ..

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

كود لعملية الاسكان ويعمل جيدا اذا كان الماسح متصل بالكمبيوتر 


تابعت امثلة كتيرة بالمنتدي ونفس مشكلة توقف البرنامج في حالة عدم وجود ماسح ضوئي والضغط علي الكود او فصل واتصال الماسح الضوئي ..

كود :
Try
           Dim s As Collection

           s = SCANNER.ScanImages()

           For Each k In s

               PictureBox1.Load(k)

           Next
       Catch ex As Exception
           MsgBox(ex.Message)
       End Try
الكود يعمل بشكل جيد من دون اسكنر فقط يعطي رسالة خطأ و يكمل البرنامج دون إغلاق .