VBS Təlimatı - Əsaslar: 5 addım

2024 Müəllif: John Day | [email protected]. Son dəyişdirildi: 2024-01-30 07:49

Tamam, buna görə də bəzi insanlar məndən vbsimi haradan öyrəndiyimi soruşdular.. w3schools kimi müxtəlif saytlardan öyrəndim, hətta web skriptləri üçün olduğunu hələ də sadə vbs -dən istifadə edə biləcəyinizi bilirəm. Məndən öyrənəcəyəm = DSo başlayaq… VBS nədir? VBScript Microsoft skript dilidir. -_- buna görə də Microsoft olaraq gedirlər və elə edirlər ki, yalnız IE-də işləyir. Ancaq veb skript olmaqla yanaşı, hər cür iş üçün istifadə olunur … məsələn, şəkil 2 -də) (bu ikinci şəkildir) Sistem 32 qovluğundan götürülür. Vbs proqramlar hazırlamaq üçün də istifadə edilə bilər.. amma bu VB. NET.. eyni kodlamaların çoxunu istifadə edir. Zəhmət olmasa dərsdən zövq alın.. və şərh yazın və qiymət verin. Və kimsə mənə vbs hazırlamaq üçün mənə qalib gəldiyini söyləyin. Dərslik.. amma tapa bilmədim. vmel scripting = P ilə həqiqətən yaxşı görünən cammel8 -dən başqa.. amma yenə də dərsliyi edəcəm.

Addım 1: Vbs əsasları

Tamam, burada əsas şeylər.. bildiyiniz şeylər var … Dosyaları aşağıdakı kimi saxlayırsınız: bir şey.vbsBu, toplu fayl kimi deyil, sizə məlumat verən bir ekranı yoxdur. Bir şəkildə JavaScript kimidir. Amma eyni zamanda buna bənzər bir şey yoxdur. Dime.g istifadə etdiyiniz bir var etmək üçün.. dim iRulenow, iRulenow -un dəyişən bir zənginə sahib ola bilərsiniz, sizə hər şeyi əlavə etməyə başlaya bilərsiniz.. məsələn: iRule = msgbox ("salam")) bu, salam deyən bir mesaj qutusu açar. (şəkil 1) Bununla yanaşı mesaj qutusuna fərqli düymələr əlavə edə bilərsiniz.. burada mesaj qutuları haqqında: BURADA onlara daxil olmaqdan belə narahat olmayacağım bir çox dərslər var. bir sıra: dim iRule (3) lakin bu belə olacaq: (0 daxil olduğu üçün) iRule (0) = "var1" iRule (1) = "var2" iRule (2) = "var3" iRule (3) = "var4" Ssenaridə varslardan istifadə etmək.. Varslardan asanlıqla istifadə edə bilərsiniz.. sahib ola bilərsiniz: (şəkil 2)

dim iRuledim InstructablesiRule = "Instructables" Instructables = msgbox ("salam" & iRule) və "salam instruktorlar" dediyinə görə iRule dəyəri öyrədilə bilər. Subs Ayrıca abunələriniz də ola bilər: Bir alt verməyən bir prosedurdur qayıdış dəyəri. Sub iRule (arg1, arg2, arg3)… Script… End SubArg 1, 2, 3 arqumentlərdir. Bütün əsaslar haqqında.. zövq alın.. ya da o qədər də əsas olmadığı üçün oxumağa davam edin..

Addım 2: Vbs -in əsasları deyil

Bu addımı Funksiyalarla başlayacağam … çünki onları hər zaman zəhlətökən görürəm.. olduqca asan olsa da = vbs -dəki funksiyalar asandır.. iş.. qarışıqlıq yarada bilər.. Asan bir funksiyadan başlayaq: (şəkil 1)

Funksiya vaxtları (x, y) dəfə = x * yİnd FunctionDim nəticədim var1result = dəfə (10, 10) var1 = msgbox (nəticə) Bu sizə 100 izah etməyimə imkan verərdi …. bunu 10 ilə 10 dəfə demisiniz.. nəticə = vaxt (10, 10) bu zamanx funksiyasına getdi, indi 10, y isə indi 10so: x * y ilə qaytarılmış dəyər. For, Next, Do, Loop For For, Next döngəsi şeyləri təkrarlamaq üçün istifadə edilə bilər, məsələn: for var = 0 ilə 5 msgbox (var) nextmsgbox ("Bitir") Bu 0, 1, 2, 3, 4, 5 sayan bir mesaj qutusu açacaq və sonra "Bitir" deyəcək vbs 0 -da demək olar ki, həmişə sayılır! bu kod bir əmri 6 dəfə təkrar edər, məsələn: var = 0 ilə 5 msgbox ("salam") nextmsgbox ("Bitir") üçün 'salam' mesajı 6 dəfə gələcək. 7 -ci dəfə Finish deyəcək. Əlavə etsəniz: add… sonuna var = 0 -dan 5 -ə qədər, məsələn, var = 0 -dan 5 -ə qədər 5 -ci addım hər dəfə 5 -ə sıçrayacaq.. bu halda mesaj yalnız 5 limit olduğu üçün iki dəfə göstərin. Siz də istefa edə bilərsiniz.. məsələn Addım -5 hər dəfə 5 geri sayar. Do, Loopthe do loop bir kod parçasını təkrar -təkrar ect etmək üçün istifadə olunur. əsasən viruslar üçün istifadə olunur = Ancaq bunları kömək etmək üçün istifadə edə bilərsiniz.. müəyyən bir seçim seçilənə qədər bir mesaj söyləmək istədiyinizi söyləyin. Do və ya döngə hissəsinə hər zaman qədər əlavə edə bilərsiniz. egdo var = 5 olana qədər kodda vara 1 və ya daha çoxunu əlavə etməlisiniz.. yoxsa döngəyə davam edəcək. Siz də do kimi istifadə edə bilərsiniz: do while var = 10this yalnız var olduqda əmrləri yerinə yetirəcək 10 -a bərabərdir! Bütün bunlar vbs -in Not So Basics -i üçündür.

Addım 3: Əgər və sonra

Tezisləri əldə etmək çox asandır, amma kiminsə nə etdiyini bilməməsi halında bir səhifəyə ehtiyac duyduqlarına qərar verdim. Amma həqiqətən çox asandır: məsələn, instructables = TheBest sonra msgbox ("bəli belədir!") Amma bu Təlim olunanların ən yaxşısı olduğunu bildiyimiz qədər çətin deyil. = P… indi çox xətli ifs ands üçün… (qorxulu musiqi) amma qorxulu bir şey yoxdur ki, ifadənin sonunda bir son əlavə etsəniz. məs. və 'həqiqətən də belədir!' ifadəsi onu bağlayırsa sonu.

the else və elseif Bunlar da çətin deyil.. qalanı yalnız bir şey üçün bir seçim istədiyiniz zaman, qalanı üçün başqa bir şeydir.. məs. var = 1 thenmsgbox ("var 1") başqa msgbox ("var 1 "deyil) bitərsə, əgər var olmazsa = 1 həmişə" var 1 deyil "deyəcək, başqa biri də çox oxşardır … məs. var = 1 thenmsgbox (" var 1 ") elseif var = 2 thenmsgbox ("var 2")) başqa msgbox ("var 1 və ya 2 deyil") bitərsə bunu bitirə bilər, əgər var 1 və ya 2 olsaydı varın 1/2 olduğunu deyərdi… 1 və ya 2 deyil.

Addım 4: Dava

hallar sadədir və həyatınızı çox asanlaşdıra bilər.. məsələn, sadə vəziyyət:

Dim FavCol FavCol = "red" Case FavCol Case "Qara" seçin msgbox ("Sizin Favori Rənginiz Qara") Case "red" msgbox ("sizin Favori Rənginiz Qırmızıdır)" Case "Sarı" msgbox ("Sizin Favori Rənginiz Sarıdır) ") Case Elsemsgbox (" İndi sadəcə çaşqınlıq yaradırsınız ") Bitirin SeçimiBu sadə skript bir siyahıdan seçimlər seçəcək, bu halda sevdiyiniz rəngin qırmızı olduğunu söyləyəcək. Bir az daha ətraflı danışmağa icazə verin…: Dim var, var = "iRule" var hər şeyi yatıra bilər, sonra vbs -dən varınızı tapmaq üçün bir siyahıya baxmağı xahiş edirsiniz … tapa bilmirsə, əgər başqa, başqa əmrinə bənzər halda Başqa İşə gedəcək. varınızı taparsa icra edəcək

Addım 5: Vars keçmək

İnternetdə ətrafa baxsanız, bir çox insanın vbs -dən vbs -ə və vbs -dən partiyalara necə keçməyi bilmək istədiyini görəcəksiniz … Mən sizə tapdığım ən yaxşı yolu göstərəcəyəm: Bu bir vbs təlimçisidir, çünki mən ' Sizə standartları vbs -dən topluya necə köçürməyinizi göstərəcəyəm … VBS TO BATCHBu vbs:

dim aa = InputBox ("Bir şey yazın:", "Var") dim WshShellset WshShell = Wscript. Createobject ("Wscript.shell") wshshell.run "test.bat" & aBu, bir var yazmağınızı xahiş edəcək yazdığınız varı keçən test.bat -a zəng edəcək. a = yazdığınız şey. toplu iş var: @echo offecho %1pauseexit bu, vbs -ə yazdığınız var yazacaq.. Sadə … birdən çox var üçün əlavə edin: vbs: wshshell.run "test.bat" & a & b & var3 ect.. onlara bir dəstə dəyər təyin etməyi unutmayın: echo %1 %2 %3 ect.. VBS BATCH Batch: @echo offset var = hellowscript testi. vbs %var %bu test.vbsthe vbs üçün 'salam' göndərəcək: dim ArgObj, aSet fso = CreateObject ("Scripting. FileSystemObject") ArgObj = WScript. Arguments a = ArgObj (0) msgbox (a) göstərəcək ' mesaj qutusuna salam. vbs -ə yığmaq üçün birdən çox variant üçün başqa bir var əlavə edin, məsələn, toplu: wscript test.vbs %var % %var2 %vbs: dim ArgObj, a, bSet fso = CreateObject ("Scripting. FileSystemObject ") ArgObj = WScript. Arguments a = ArgObj (0) b = ArgObj (1) msgb qurun ox (a) msgbox (b) 0 sayını UNUTMAYIN Əgər bunlarla bağlı hər hansı bir probleminiz varsa pm və ya şərh yazın.