VBS pamoka - pagrindai: 5 žingsniai

2024 Autorius: John Day | [email protected]. Paskutinį kartą keistas: 2024-01-30 10:51

Gerai, todėl kai kurie žmonės manęs klausė, iš kur aš išmokau savo vbs. Aš sužinojau iš įvairių svetainių, pvz., „W3schools“, netgi žinau, kad tai yra žiniatinklio scenarijų kūrimas, bet jūs vis tiek galite jį naudoti iš paprastų vbs. Aš to išmokau iš jūsų svetainių “Išmoksiu iš manęs = DSo leidžia pradėti … Kas yra vbs? VBScript yra „Microsoft“scenarijų kalba. -_- taigi, būdami „Microsoft“, jie eina ir daro tai taip, kad jis veiktų tik naudojant IE. Tačiau jis yra ne tik žiniatinklio scenarijus, bet ir naudojamas įvairiems dalykams … pavyzdžiui, 2 paveiksle) (tai yra antroji nuotrauka) Tai yra paimta iš „System 32“aplanko. Vbs taip pat gali būti naudojamas programoms kurti.. bet tai VB. NET.. vis dėlto naudoja daugumą to paties kodavimo. Mėgaukitės pamoka.. ir pakomentuokite bei įvertinkite. Ir pasakykite man, ar kas nors man padėjo padaryti vbs pamoka.. bet aš negalėjau rasti vieno. Išskyrus „cammel8“, kuris, atrodo, tikrai gerai išmano „vbs“scenarijų = P.. bet aš vis tiek padarysiu pamoką.

1 žingsnis: Vbs pagrindai

Gerai, taigi čia yra pagrindai.. dalykai, kuriuos jau turėtumėte žinoti … Jūs išsaugote failus kaip: something.vbs Tai nėra kaip paketinis failas, jame nėra informacijos, rodančios ekraną. Tam tikra prasme tai panašu į „javascript“. Bet tuo pačiu metu tai nieko panašaus. Kad sukurtumėte var, naudojate dime. G.. dim iRulenow turėtumėte kintamąjį skambutį iRulenow, galite pradėti pridėti dalykų prie jūsų.. kaip: iRule = msgbox ("labas") tai parodys pranešimų laukelį, kuriame sakoma „labas“. (1 pav.) Kartu su tuo galite pridėti įvairių mygtukų prie pranešimų laukelio.. čia viskas apie pranešimų laukelius: ČIA tiek daug pamokų apie juos, kad aš net nesirūpinsiu į juos. Taip pat naudodami versijas galite pritemdyti masyvas: dim iRule (3), bet tai būtų taip: (nes įtraukta 0) iRule (0) = "var1" iRule (1) = "var2" iRule (2) = "var3" iRule (3) = "var4" Naudojant var scenarijuje.. Var galite lengvai naudotis.. galite turėti: (2 pav.)

dim iRuledim instructablesiRule = "instructables" instrukcijos grąžinama vertė. Sub iRule (arg1, arg2, arg3)… Scenarijus… End Sub

2 žingsnis: ne taip Vbs pagrindai

Šį žingsnį pradėsiu nuo funkcijų … nes man visada atrodo, kad jos erzina.. nors jos yra gana lengvos = Funkcijos vbs yra lengvos.. ish.. jos gali būti painios … Pradėkime nuo lengvos funkcijos: (1 pav.)

Funkcijų laikas (x, y) kartus = x * y Pabaigoje FunctionDim resultdim var1result = times (10, 10) var1 = msgbox (rezultatas) Tai suteiks jums 100 paaiškinimų…. Jūs tai pasakėte 10 kartų 10 … rezultatas = laikas (10, 10) tai atitiko funkciją timesx dabar yra 10, o y dabar yra 10so: x * y grąžina reikšmę su atsakymu. For, Next, Do, Loop var = nuo 0 iki 5 msgbox (var) nextmsgbox ("Baigti") Bus rodomas pranešimų langelis, kuriame bus 0, 1, 2, 3, 4, 5, tada bus sakoma „Baigti“. tas kodas komandą kartotų 6 kartus, pvz.: var = nuo 0 iki 5 msgbox ("labas") nextmsgbox ("Baigti") pranešimas "labas" pasirodytų 6 kartus. 7 -ąjį kartą jis pasakys „Baigti“. Jei pridėsite: žingsnis… iki var = 0–5, pvz., var = 0–5 5 veiksmas, kaskart privers peršokti 5.. šiuo atveju pranešimas bus tik rodyti du kartus, nes 5 yra riba. Taip pat galite pasitraukti.. pvz žingsnis -5 kiekvieną kartą skaičiuotų 5. Atlikite, „Loopthe do“kilpa naudojama kodo daliai pakartoti ir kartoti. daugiausia naudojamas virusams = P, bet jūs galite juos panaudoti, kad jums padėtų.. sakykite, ar norite sakyti pranešimą tol, kol bus pasirinkta tam tikra parinktis. Visada galite pridėti „iki“ant „do“arba ant kilpos dalies. pvz., kol var = 5, bet į kodą turite pridėti 1 ar daugiau prie var. arba jis bus tęsiamas. Taip pat galite naudoti „do“iš tokio dalyko kaip: do, kol var = 10. yra lygus 10! Tai viskas ne taip pagrindai vbs.

3 žingsnis: jei ir tada

Tezes yra gana lengva gauti, bet aš nusprendžiau, kad jiems reikia puslapio, jei kas nors nežino, ką jie daro. Bet iš tikrųjų jie yra labai paprasti: pvz., Instrukcijos = TheBest, tada msgbox ("taip, tai yra!") nesunku, nes visi žinome, kad pamokymai yra geriausi. = P… dabar kelių eilučių „If“ir „Afters“… (baisi muzika), bet ten nėra taip baisu, kad tiesiog pridedate pabaigą, jei teiginio pabaigoje. el. ir „tikrai taip!“- pabaiga, jei teiginys ją uždaro.

the else ir elseif Tai taip pat nėra sunku.. kita yra skirta tik tada, kai norisi vieno varianto vienam dalykui, o kitam - kitam.. pvz., var = 1 thenmsgbox ("var is 1") else msgbox ("var nėra 1 ") pabaiga, taigi, jei var nėra = 1, ji visada sakys:" var nėra 1 ", kitas yra taip pat labai panašus … pvz., var = 1 tadamsgbox (" var yra 1 ") elseif var = 2 tadamsgbox ("var yra 2") else msgbox ("var is not 1 or 2") end if if this would make it so if var var 1 or 2, see would say ne 1 ar 2.

4 žingsnis: bylos

atvejai yra paprasti ir gali labai palengvinti jūsų gyvenimą.. pvz., paprastas atvejis:

Dim FavCol FavCol = "red" Pasirinkite atvejį FavCol Case "Black" msgbox ("jūsų mėgstamiausia spalva yra juoda") Case "red" msgbox ("jūsų mėgstamiausia spalva yra raudona") Case "Yellow" msgbox ("jūsų mėgstamiausia spalva yra geltona") ") Byla Elsemsgbox (" Dabar tavo tiesiog paini ") Pabaiga Pasirinkus šį paprastą scenarijų bus pasirinktos parinktys iš sąrašo, tokiu atveju jis jums pasakys, kad jūsų mėgstamiausia spalva yra raudona. Leiskite man šiek tiek išsamiau susipažinti … jūs gausite savo variantą: Dim var, var = "iRule" var gali užgniaužti bet ką, tada jūs paprašysite vbs peržiūrėti sąrašą, kad surastų jūsų varą … jei jis negali jo rasti, jis pateks į: Case Else, kuris yra panašus į komandą if, else. jei jis ras jūsų var, jis vykdys

5 žingsnis: Pravažiuokite „Vars“

Jei apsižvalgysite internete, pamatysite, kad daugelis žmonių nori žinoti, kaip perduoti versijas tarp partijų į vbs ir vbs į paketus … Aš jums parodysiu geriausią būdą, kurį radau: kadangi tai yra vbs pamoka Parodysiu, kaip pirmiausia perkelti versijas iš vbs į partiją … VBS TO BATCH Tai vbs:

dim aa = InputBox ("Įveskite kažką:", "Var") dim WshShellset WshShell = Wscript. Createobject ("Wscript.shell") wshshell.run "test.bat" & a paskambins test.bat, praleisdamas jūsų įvestą var. a = tai, ką įvedėte. čia yra paketas: @echo offecho %1pauseexittŠis parašys var, kurį įvedėte į vbs.. Paprastas … kelioms var, pridėkite: vbs: wshshell.run "test.bat" & a & b & var3 ir tt.. nepamirškite jiems nustatyti vertės: partija: echo %1 %2 %3 ect.. Batch to VBS partija: @echo offset var = hellowscript test. vbs %var %tai bus atsiųsta „labas“, kad būtų galima patikrinti. vbsthe vbs: dim ArgObj, aSet fso = CreateObject ("Scripting. FileSystemObject") Nustatykite ArgObj = WScript. Arguments a = ArgObj (0) msgbox (a) tai bus rodoma " sveiki "pranešimų laukelyje. kelioms partijoms į vbs lengvai pridėti kitą variantą, pvz., partiją: wscript test.vbs %var % %var2 %the vbs: dim ArgObj, a, bSet fso = CreateObject (" Scripting. FileSystemObject ") Nustatykite ArgObj = WScript. Arguments a = ArgObj (0) b = ArgObj (1) msgb ox (a) msgbox (b) ATSIMINTI 0 skaičiaus Jei turite kokių nors problemų, rašykite pm arba komentuokite.