إن تأكيد وجود الملف أمر سهل مع VBScript.
حقوق الصورة: Ablestock.com/AbleStock.com/Getty Images
عند كتابة كود VBScript ، قد يحتاج المبرمج إلى تأكيد وجود الملف قبل تنفيذ إجراء أو استدعاء وظيفة. يمكن تحقيق ذلك عن طريق الوصول إلى Windows Script Host باستخدام VBScript والاستفادة من FileSystemObject. أفضل طريقة لتعلم تقنية البرمجة هذه هي اتباع مثال خطوة بخطوة. هذه ممارسة جيدة لمبرمج VBScript مبتدئ.
الخطوة 1
افتح المفكرة. انقر فوق قائمة "ابدأ" في Windows واكتب "notepad" في مربع البحث. حدد المفكرة من نتائج البحث.
فيديو اليوم
الخطوة 2
قم بإنشاء ملف جديد في برنامج "المفكرة". اكتب بضعة أحرف عشوائية في الملف واحفظها كـ "C: \ Temp \ test.txt". سيتم استخدام هذا الملف لشرح كود VBScript.
الخطوه 3
قم بإنشاء مستند جديد آخر في برنامج "المفكرة" واحفظ هذا الملف باسم "C: \ Temp \ FileCheck.vbs". تؤدي إضافة ملحق ".vbs" إلى ملف نصي إلى إنشاء ملف VBScript قابل للتنفيذ على جهاز كمبيوتر يعمل بنظام Windows.
الخطوة 4
انسخ الكود التالي والصقه في مستند Notepad الخاص بك:
خيار صريح
"تعيين البعد DIM fso
'Set Object Set fso = CreateObject ("برمجة. FileSystemObject ")
إنشاء شرط إذا (fso. FileExists ("C: \ Temp \ test.txt")) ثم "تنبيه المستخدم WScript. صدى ("الملف موجود!") WScript. قم بإنهاء () آخر "تنبيه المستخدم WScript. Echo ("الملف غير موجود!") End If
الخروج من البرنامج النصي WScript. استقال()
الخطوة الخامسة
احفظ ملف VBScript الذي قمت بإنشائه للتو واخرج من برنامج "المفكرة".
الخطوة 6
تصفح المجلد الذي يحتوي على ملف VBScript الخاص بك وانقر نقرًا مزدوجًا فوق "FileCheck.vbs". يجب أن يظهر مربع رسالة لتأكيد: "الملف موجود!" حدد "موافق" لإغلاق مربع الرسالة.
الخطوة 7
إعادة تسمية أو حذف ملف "C: \ Temp \ test.txt" الذي أنشأته في الخطوة 1 ؛ ثم ، انقر نقرًا مزدوجًا فوق البرنامج النصي "FileCheck.vbs" مرة أخرى. هذه المرة ، الملف المحدد غير موجود وستظهر لك رسالة تنص على أن "الملف غير موجود موجود! "إن عبارة If-Then-Else في كود VBScript الخاص بك تقوم بإجراء الفحص وتنبيهك إلى ملف النتائج. حدد "موافق" لإغلاق مربع الرسالة.
تحذير
عند العمل باستخدام ملفات VBSscript ، سيؤدي النقر المزدوج فوق هذه الملفات إلى تشغيل رمز VBScript. لتحرير ملف بامتداد .vbs ، انقر بزر الماوس الأيمن فوق الملف وحدد "تحرير" من قائمة السياق.
