Урок за VBS - Основи: 5 стъпки

2024 Автор: John Day | [email protected]. Последно модифициран: 2024-01-30 07:56

Добре, така че някои хора ме питат от къде научих моите vbs.. научих от различни уебсайтове, като w3schools, дори знам, че за уеб скриптове все още можете да го използвате от обикновен vbs. ще го науча от мен = DSo нека започнем … Какво е vbs? VBScript е скриптов език на Microsoft. -_- така че като Microsoft те отиват и го правят, така че да работи само в IE. Но освен че е уеб скрипт, той се използва за всякакви неща … например на снимка 2) (това е втората снимка) Това е взето от папката System 32. Vbs може да се използва и за създаване на програми.. но това е VB. NET.. все пак използва повечето от същото кодиране. Моля, насладете се на урока.. и моля, коментирайте и оценете. И моля, кажете ми, ако някой ме е цвекло да направя vbs урок.. но не успях да намеря такъв. Освен cammel8, който изглежда е наистина добър с vbs скриптове = P.. но все пак ще направя урока.

Стъпка 1: Основи на Vbs

Добре, така че тук са основните неща … неща, които вече трябва да знаете … Запазвате файловете като: something.vbsТова не е като пакетния файл, няма екран, който да ви информира. В известен смисъл много прилича на javascript. Но в същото време това не е нищо подобно.) това ще доведе до изскачане на поле за съобщения, което казва здравей. (снимка 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 Можете също така да имате subs: A sub е процедура, която НЕ дава възвращаема стойност. Sub iRule (arg1, arg2, arg3) … Скрипт … Край под

Стъпка 2: Не толкова основи на Vbs

Ще започна тази стъпка с функции … защото винаги ги намирам за досадни.. въпреки че са доста лесни = Pfunctions във vbs са лесни.. иш.. те могат да станат объркващи.. Нека започнем с лесна функция: (снимка 1)

Функционални времена (x, y) times = x * yEnd FunctionDim resultdim var1result = times (10, 10) var1 = msgbox (резултат) Това ще ви даде 100 да ми обясни …. Казахте го на пъти 10 на 10..резултат = време (10, 10) това отиде при функцията timesx вече е 10 и y вече е 10so: x * y връща стойност с отговор. За, Next, Do, Loop Цикълът For, Next може да се използва за повтаряне на неща, например: за var = 0 до 5 msgbox (var) nextmsgbox ("Finish") Това ще изскочи кутия със съобщения, броейки 0, 1, 2, 3, 4, 5, след което ще каже "Finish" ЗАПОМНЕТЕ в vbs 0 почти винаги се брои! този код ще повтаря команда 6 пъти, например: за var = 0 до 5 msgbox ("здравей") nextmsgbox ("Край") съобщението "здравей" ще се появи 6 пъти. на 7 -ми път ще се каже Finish. Ако добавите: стъпка… до края на за var = 0 до 5 например за var = 0 до 5 стъпка 5 това ще го накара да скочи 5 всеки път.. в този случай съобщението само ще покажете два пъти, защото 5 е ограничението. Можете също да се оттеглите.. напр стъпка -5 всеки път ще брои 5. До, Loopt цикълът do се използва за цикъл на парче код отново и отново и отново и др. използва се главно за вируси = P, но можете да ги използвате, за да ви помогнем.. кажете дали искате да продължите да казвате съобщение, докато не бъде избрана определена опция. Винаги можете да добавите До, докато правите или в цикъла. egdo до var = 5, но в кода трябва да го накарате да добави 1 или повече към var.. или той ще продължи да циклизира. Можете също да използвате do от нещо като: do while var = 10 това ще прави командите само ако var е равно на 10! Това е всичко за не толкова основите на vbs.

Стъпка 3: Ако и тогава

Тези тези са доста лесни за получаване, но реших, че се нуждаят от страница, в случай че някой не знае какво прави. Но наистина са много лесни: e-g.webp

the else и elseif Те също не са трудни.. иначе е само когато искате една опция за едно нещо и друга за останалите.. e-g.webp

Стъпка 4: Казус

случаите са прости и могат да направят живота ви много по -лесен.. например прост случай:

Dim FavCol FavCol = "red" Изберете случай FavCol Case "Черен" msgbox ("вашият любим цвят е черен") Дело "червено" msgbox ("вашият любим цвят е червен") Дело "жълто" msgbox ("вашият любим цвят е жълт" ") Дело Elsemsgbox (" Сега просто обърквате ") Край Изберете този прост скрипт ще избере опции от списък в този случай той ще ви каже, че любимият ви цвят е червен. Нека да разгледам малко по -подробно … получавате вашия var: Dim var, var = "iRule" var може да отмени всичко, след което молите vbs да прегледа списък, за да намери вашия var … ако не може да го намери, ще отиде в: Case Else, който е точно като командата if, else. ако намери вашия var, той ще се изпълни

Стъпка 5: Преминаване на Vars

Ако се огледате из интернет, ще откриете, че много хора искат да знаят как да предават варс между партида към vbs и vbs към партида … Ще ви покажа най -добрия начин, който открих: Тъй като това е урок за vbs, аз ще ви покажа как първо да прехвърляте vars от 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 invocho %1pauseexit това ще напише вар, който сте въвели във vbs.. Прост … за множество var просто добавете: vbs: wshshell.run "test.bat" & a & b & var3 ect.. не забравяйте да им зададете стойностна партида: echo %1 %2 %3 ect.. BATCH TO VBSпартията: @echo offset var = hellowscript тест. vbs %var %това ще изпрати „здравей“на test.vb vbs: dim ArgObj, aSet fso = CreateObject („Scripting. FileSystemObject“) Задайте ArgObj = WScript. Arguments a = ArgObj (0) msgbox (a) това ще покаже „ здравей "в полето за съобщение. за множество варианти за партида към vbs лесно добавете друг var e.g партидата: 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 броя Ако имате някакви проблеми с тях, моля пишете или коментирайте.