[vbnet]

.....

في (Datapase Tools.zip) وجدت أنه لم يطبق الحل المذكور بالخطوة الأولى التي في ردي السابق،
فقد قمت بتنفيذ الحل المذكور وعمل البرنامج، وهي مشكلة مع 2008 فقط ( شكك في محله).

أنصحك بإزالت كل (On Error Resume Next) من الكود لأنها تتسبب في التغطية على الأخطاء وأماكنها ولا تكشفها لك،
وكان من المفترض استخدام Try بشرط إظهار رسالة في الجزء Catch الخاص بها توضح نص الخطأ وتنفيذ أمر معين كالخروج من البرنامج أو أمر آخر.

.....