תוכן עניינים:

מדריך VBS - יסודות: 5 שלבים
מדריך VBS - יסודות: 5 שלבים

וִידֵאוֹ: מדריך VBS - יסודות: 5 שלבים

וִידֵאוֹ: מדריך VBS - יסודות: 5 שלבים
וִידֵאוֹ: Process Hacker Essentials: Empowering IT Pros for Troubleshooting 2024, יולי
Anonim
הדרכת VBS - יסודות
הדרכת VBS - יסודות
הדרכת VBS - יסודות
הדרכת VBS - יסודות

אוקי אז כמה אנשים שאלו אותי מאיפה למדתי את ה- vbs שלי.. למדתי מאתרים שונים, כמו w3schools, אפילו יודעים שזה בשביל סקריפטים באינטרנט אתה עדיין יכול להשתמש בו מ- vbs רגיל. אני לומד את זה מאתרים שאתה ' אלמד את זה ממני = DSo מאפשר להתחיל … מה זה vbs? VBScript היא שפת סקריפטים של מיקרוסופט. -_- אז בהיותם מיקרוסופט הם הולכים ועושים את זה כך שזה עובד רק על IE. אבל בנוסף להיותו סקריפט אינטרנט, הוא משמש לכל מיני דברים … למשל בתמונה 2) (זו התמונה השנייה) שהיא נלקחת מהתיקייה System 32. ניתן להשתמש ב- Vbs גם ליצירת תוכניות.. אבל זה VB. NET.. משתמש ברוב אותו קידוד. בבקשה תהנה מהמדריך.. בבקשה אנא הגיב ודרג. ותגיד לי אם מישהו הצליח לי לעשות vbs הדרכה.. אבל לא הצלחתי למצוא אחד. חוץ מ cammel8 שנראה ממש טוב עם vbs scripting = P.. אבל אני עדיין הולך לעשות את ההדרכה.

שלב 1: יסודות Vbs

יסודות Vbs
יסודות Vbs
יסודות Vbs
יסודות Vbs

אוקיי אז הנה היסודות.. דברים שכדאי שתדעו כבר … אתם שומרים את הקבצים כ: something.vbs זה לא כמו קובץ אצווה, אין לזה מסך שמספר לכם מידע. בדרך זה דומה מאוד ל- javascript. אבל באותו הזמן זה לא דומה לזה. כדי ליצור var אתה משתמש dime.g.. dim iRulenow תהיה לך שיחה משתנה iRulenow אתה יכול להתחיל להוסיף לך דברים.. כמו: iRule = msgbox ("שלום") זה יגרום לתיבת הודעות לצוץ שאומר שלום. (תמונה 1) יחד עם זה אתה יכול להוסיף כפתורים שונים לתיבת ההודעות.. כאן הכל על תיבות הודעות: כאן כל כך הרבה הדרכות עליהן שאפילו לא אטרח להיכנס אליהן. מערך: dim iRule (3) אבל זה ייראה כך: (מכיוון 0 כלול) iRule (0) = "var1" iRule (1) = "var2" iRule (2) = "var3" iRule (3) = "var4" שימוש ב- vars בתסריט..אתה יכול להשתמש ב- vars בקלות.. אתה יכול לקבל: (תמונה 2)

dim iRuledim instructablesiRule = "instructables" instructables = msgbox ("hello" & iRule) בגלל & כתוב 'hello instructables' מכיוון שהערך של iRule הוא instructables. Subs תוכל לקבל גם משנה: תת הוא הליך שאינו נותן value return. Sub iRule (arg1, arg2, arg3) … Script … End Sub Arg 1, 2, 3 הם Arguments. That לגבי כל היסודות.. תהנה מהם.. או המשך לקרוא לא כל כך בסיסי..

שלב 2: לא כל כך בסיסי של Vbs

לא כל כך יסודות Vbs
לא כל כך יסודות Vbs

אני הולך להתחיל את השלב הזה עם פונקציות … כי אני תמיד מוצא אותם מעצבנים.. למרות שהם די קלים = תפקודים ב- vbs קלים.. הם יכולים להסתבך.. נתחיל בפונקציה קלה: (תמונה 1)

זמני פונקציות (x, y) פעמים = x * yEnd FunctionDim resultdim var1result = פעמים (10, 10) var1 = msgbox (תוצאה) זה ייתן לך 100 תן לי להסביר …. אמרת את זה פעמים 10 על 10..תוצאה = זמן (10, 10) זה הלך לפונקציה timesx הוא כעת 10 ו- y הוא כעת 10so: x * y value return with answer. For, Next, Do, Loop ניתן להשתמש בלולאה For, Next כדי לחזור על דברים, למשל: עבור var = 0 עד 5 msgbox (var) nextmsgbox ("סיום") פעולה זו תפתח תיבת הודעות המונה 0, 1, 2, 3, 4, 5 ואז היא תגיד 'סיום' זכור ב vbs 0 כמעט תמיד נחשב! אז קוד זה יחזור על פקודה 6 פעמים למשל: עבור var = 0 עד 5 msgbox ("שלום") nextmsgbox ("סיום") ההודעה 'שלום' תעלה 6 פעמים. בפעם השביעית יגיד Finish. אם תוסיף: שלב … עד הסוף של var = 0 עד 5 למשל עבור var = 0 עד 5 שלב 5 שיגרום לו לקפוץ 5 בכל פעם.. במקרה זה ההודעה רק הצג פעמיים כי 5 הוא הגבול. אתה יכול גם לרדת גם.. למשל שלב -5 יספור 5 בכל פעם. עשה זאת, לולאת לולאה משמשת ללולאת פיסת קוד שוב ושוב ושוב ect. משמש בעיקר לווירוסים = Pbut אתה יכול להשתמש בהם כדי לעזור לך.. תגיד אם אתה רוצה להמשיך להגיד הודעה עד שתבחר אפשרות מסוימת. אתה תמיד יכול להוסיף חלק עד עד או על הלולאה. egdo until var = 5 אבל בקוד עליך לגרום לו להוסיף 1 או יותר ל- var.. או שהוא ימשיך בלולאה. תוכל גם להשתמש ב- do from thing like: do while var = 10 זה יעשה את הפקודות רק אם var זה שווה ל 10! זה הכל בשביל היסודות הלא כל כך של vbs.

שלב 3: ה- if's ו- then's

די קל להשיג את התזות אבל החלטתי שהם צריכים דף למקרה שמישהו לא יודע מה הוא עשה. אבל באמת שהם מאוד קלים: למשל instruks = TheBest ואז msgbox ("כן זה!") אבל זה לא קשה כיוון שכולנו יודעים שמדריך זה הכי טוב. = P… עכשיו עבור ifs ו- ths מרובי שורות … (מוזיקה מפחידה) אבל אם לא כל כך מפחיד אתה רק מוסיף סוף אם בסוף ההצהרה. e-g.webp

גם אחר וגם אם זה לא קשה.. האחרים נועדו רק כשאתה רוצה אפשרות אחת לדבר אחד ואחר לשאר.. למשל var = 1 thenmsgbox ("var is 1") אחר msgbox ("var הוא לא 1 ") סוף ifso אם var לא = 1 הוא תמיד יגיד 'var אינו 1' גם ה- ifsif דומה מאוד … למשל var = 1 thenmsgbox (" var is 1 ") elseif var = 2 thenmsgbox ("var הוא 2") אחר msgbox ("var אינו 1 או 2") מסתיים אם זה יגרום לזה כך שאם var היה 1 או 2 זה יגיד var הוא 1/2 … אבל אם זה לא אז זה יגיד var is לא 1 או 2.

שלב 4: של מקרה

המקרים פשוטים ויכולים להפוך אותך לחיים הרבה יותר קלים. למשל מקרה פשוט:

Dim FavCol FavCol = "אדום" בחר מקרה FavCol מקרה "שחור" msgbox ("צבע האהוב עליך הוא שחור") מארז "אדום" msgbox ("צבע האהוב עליך אדום") מקרה "צהוב" msgbox ("צבע הפייבור שלך הוא צהוב ") Case Elsemsgbox (" עכשיו אתה סתם מבלבל ") סוף בחירה התסריט הפשוט הזה יבחר אפשרויות מתוך רשימה במקרה זה יגיד לך שצבע האהוב שלך אדום. תן לי להיכנס אליו קצת יותר בפירוט … אתה מקבל את var שלך: Dim var, var = "iRule" var יכול לסייג כל דבר ואז אתה מבקש מה- vbs לחפש ברשימה כדי למצוא את var שלך … אם הוא לא יכול למצוא אותו הוא יגיע ל: Case Else שזה בדיוק כמו הפקודה if, else. אם הוא ימצא את var שלך הוא יבוצע

שלב 5: העברת Vars

עובר וארס
עובר וארס

אם תסתכל מסביב באינטרנט תגלה שהרבה אנשים רוצים לדעת איך להעביר vars בין batch ל- vbs ו- vbs ל- batch … אני אראה לך את הדרך הטובה ביותר שמצאתי: מכיוון שמדובר במדריך vbs אני ' אראה לך כיצד להעביר קודם כל vbs מ- vbs לאצווה … VBS ל- BATCH זהו ה- vbs:

dim aa = InputBox ("הקלד משהו:", "Var") dim WshShellset WshShell = Wscript. Createobject ("Wscript.shell") wshshell.run "test.bat" & a זה יבקש ממך להקליד var ואז זה ייקרא test.bat לעבור את var שהקלדת. a = מה שהקלדת. הנה האצווה: @echo offecho %1pauseexitthit יכתוב את var שהקלדת לתוך ה- vbs..פשוט … עבור var varion רק הוסף: vbs: wshshell.run "test.bat" & a & b & var3 ect.. זכור להגדיר להם ערך ערך האצווה: הד %1 %2 %3 ect.. BATCH ל- VBS האצווה: @echo offset var = מבחן hellowscript. vbs %var %זה ישלח 'שלום' ל test.vbsthe vbs: dim ArgObj, aSet fso = CreateObject ("Scripting. FileSystemObject") הגדר ArgObj = WScript. Arguments a = ArgObj (0) msgbox (a) זה יוצג ' שלום 'בתיבת ההודעות. למספר רב של קבוצות עבור אצווה ל- vbs הוסף בקלות עוד var, למשל האצווה: wscript test.vbs %var % %var2 %vbs: dim ArgObj, a, bSet fso = CreateObject ("Scripting. FileSystemObject ") הגדר ArgObj = WScript. Arguments a = ArgObj (0) b = ArgObj (1) msgb ox (a) msgbox (b) זכור 0 ספירות אם יש לך בעיות עם אלה אנא ציין pm או הגיב.

מוּמלָץ: