תוֹכֶן
בעת כתיבת קוד ב- VBScript, מתכנת עשוי להזדקק לאישור שקיים קובץ לפני ביצוע פעולה או קריאה לפונקציה. ניתן לשלב זאת על ידי גישה אל "Windows Script Host" יחד עם VBScript ושימוש ב- FileSystemObject. הדרך הטובה ביותר ללמוד טכניקת תכנות זו היא לעקוב אחר דוגמה שלב אחר שלב. זה נוהג טוב עבור מתכנת חדש ב- VBScript.
שלב 1
פתח את פנקס הרשימות. לחץ על תפריט "התחל" והקלד "פנקס רשימות" בתיבת החיפוש. בחר פנקס רשימות בתוצאות החיפוש.
שלב 2
צור קובץ חדש בפנקס הרשימות. הקלד כמה אותיות אקראיות בקובץ ושמור אותו כ: "C: Temp test.txt". הוא ישמש להדגמת קוד VBScript.
שלב 3
צור מסמך חדש בפנקס הרשימות ושמור אותו כ: "C: Temp FileCheck.vbs". הכללת סיומת ".vbs" בקובץ הטקסט יוצרת קובץ VBScript להפעלה של Windows.
שלב 4
העתק והניח את הקוד הבא במסמך פנקס הרשימות שלך:
אפשרות מפורשת
'הגדר ממד DIM fso
’Set Set Set fso = CreateObject (" Scripting.FileSystemObject ")
'צור תנאי אם (fso.FileExists ("C: Temp test.txt")) ואז' התריע על המשתמש WScript.Echo ("הקובץ קיים!") WScript.Quit () אחרת 'התראת משתמש WScript.Echo (" הקובץ לא קיים! ") סיום אם
'צא מהסקריפט WScript.Quit ()
שלב 5
שמור את קובץ ה- VBScript שיצרת וצא מהתוכנית.
שלב 6
פתח את התיקיה המכילה את קובץ VBScript ולחץ לחיצה כפולה על "FileCheck.vbs". תופיע תיבת הודעה המאשרת: "הקובץ קיים!" בחר "אישור" כדי לסגור את תיבת ההודעות.
שלב 7
שנה שם או מחק את הקובץ "C: Temp test.txt" שנוצר בשלב 1 ואז לחץ פעמיים על התסריט "FileCheck.vbs". הקובץ שצוין כבר לא קיים ותראה הודעה שאומרת: " קובץ לא קיים! "(הקובץ לא קיים!). הצהרת ה- If-Then-Else בקוד בודקת ומודיעה לך על התוצאות. בחר" אישור "כדי לסגור את תיבת ההודעות.
