Ihato's Blog

Ihato's Blog http://gmk.blog.rs/blog/gmk This blog belongs to ihato. gmk 2026-06-16T19:44:44Z VisualBasicScript http://gmk.blog.rs/blog/gmk/generalna/2011/08/20/vbscript Ovod je ukratko o Visual Basic Script (ili VBS).VBS je vrlo lak jezik koji se lako uči, i većina njegovih funkcija kaže &scaron;ta je (npr. MsgBox-Message Box). Promenljiv je u Text File (*.txt) tako da vam ne treba nikakav program da bi ga koristili. Samo treba da napi&scaron;ete skript u .txt i promenite Extension iz ".txt" u ".vbs". Ako na File-u nema Extension-a, idite na "Start Menu>>Control Panel>>Folder Options>>View" i isključite "Hide extensions of known file types". To će pokazati extension-e za sve fajlove.Ovaj jezik je Case Sensitive sto znači da nije važno da li su slova VELIKA ili mala.  Kao i svaki programski jezik, i ovaj ima neke funkcije. Funkcija (function) je neka reč koja radi ne&scaron;to sa skriptom u zavisnosti od argumenata koje ima. Izgleda ovako: function(argument0,argument1,argument2....) U većim jezicima (C#, Delphi, Java...) zagrade između argumenata su neophodne, ali po&scaron;to je VBS prost, on nemora da ih ima. npr. function(arg1,arg2,arg3) je u VBS isto &scaron;to i function arg1,arg2,arg3. VBS je toliko prost, da ne mora čak ni da ima sve argumente. Ako vam naprimer ne treba ne&scaron;to u funkciji, ne morate ni da ga napi&scaron;ete. Evo nekoliko lakih funkcija koje se  često koriste:Dim variable - Ovo  će stvoriti nov variable u script-u. Variable je ne&scaron;to u &scaron;ta se snima neka memorija. Naprimer: u x=6, x je variable i njegova vrednost (value) je 6. Variable može i da bude i tekst, ali onda, tekst mora da bude string. &Scaron;ta je string? Ni&scaron;ta vi&scaron;e od teksta koji je u navodnicima (npr. "Zdravo!"). Ova funkcija bi trebalo da se "pozove" pre nego &scaron;to se variable koristi, ali i ne mora. Npr.:Dim xx="Zdravo!" MsgBox(text,buttons,title) - Ova funkcija pokazuje Windows Dialog (ili poruku) na ekran. Kao &scaron;to vidite, ima 3 argument-a. Prvi je text. Tu treba da napi&scaron;ete string teksta koji će da se prikazuje u poruci. buttons argument je argument u kome treba da stavite kako će poruka izgledati (ikone, dugmići...). trebalo bi da izgleda ovako: "dugmići+ikone". Postoje konstante (constants) u VBS koji "daju" dugmiće i ikone. Konstante za dugmiće: vbOKOnly (0), vbOKCancel(1), vbAbortRetryIgnore (2), vbYesNoCancel(3), vbYesNo (4), vbRetryCancel (5)Konstante za ikone: NoIcon (0) vbCritical (16),vbQuestion (32),vbExclamation (48), vbInformation (64)Tako da, ako hoćete da pokažete npr. neki error, u dugmiće napi&scaron;ite: vbYesNo+vbCricital (ili 4+16 jer je to jedno te isto)  U title treba da stavite String  koji će da pi&scaron;e u naslovu poruke.Ova funkcija "vraća" (return) dugme koje ste kliknuli. To znači da bi trebalo da bude u variable-u. Na primer: x=MsgBox("Zdravo!, Pojavio se error. Zao mi je",vbOkOnly+vbCritical,"error")U gornjem primeru x može biti: OK (1), Cancel (2), Abort (3), Retry (4), Ignore (5), Yes (6), No (7) Tako da ako kliknete OK, x će biti 1, itd. WScript.Echo(text) - Ovo je najprostija poruka. "Ne vraća" ni&scaron;ta. Samo pokazuje jednostavnu poruku sa tekstom text. Naravno, text je string. 'Comment - Kada se na nekom mestu nalazi znak ['], onda se od tog znaka pa nadalje u tom redu ni&scaron;ta ne računa kao Script. Ono samo služi za lak&scaron;e snalaženje u Skriptu. If(uslov)...Then - Najprostiji oblik da se proveri variable. "If" znači "ako", a then znači "onda". Znači, "ako uslov onda ....". Na "uslov" mora da bude variable i value koji će se testirati. Na primer, uslov može da bude x=4. Onda će se testirati dali je x=4. Ako jeste, onda će "Then" dopustiti da se desi neka radnja. Ako nije, onda ni&scaron;ta. Script ide dalje bez te radnje. Ali, postoj mogućnost da se desi ne&scaron;to drugo ako ne "Then akcija". Za to nam treba Elseif i Else. Elseif daje novi uslov. Ako nije ispunjen 1. uslov, Elseif može da stvori novi uslov. Ako se i to ne ispuni, onda Else dolazi.Else će dopustiti radnju ako se nijedan "Then" nije ostvario.Ako jeste, onda neće dopustiti. Evo jedan primer: x=8 'stvorimo variable x. Napisite umesto 8 sta vi hocete If (x=5) Then                   'Ako je x=5 WScript.Echo("X je 5")          'onda prikazi ovu poruku Elseif (x=4) Then               'ako nije, onda vidi da li je x 4 WScript.Echo("X je 4, ne 5")    'ako jeste 4, onda Posalji poruku Else                            'Ako nije ni 4 ni 5 WScript.Echo("Ne znam X")       'onda prikazi poruku "ne znam"    End if                          'Zavrsi sa ifinputBox(text,title,default) - Ova funkcija prikazuje Windows Dialog u kome treba da se unese tekst. text i title verovatno znate &scaron;ta je, ako ste čitali funkciju MsgBox. text je tekst koji će se prikazivati u poruci, a title je naslov. default je početni tekst. Funkcija vraća tekst koji ste napisali. Dim x 'Stvaranje iks-a x=inputBox("Zdravo. Napisite nesto dole","Unos","pocetni tekst") 'funkcija WScript.Echo "Napisali ste: " + x 'Samo poruka da pokaze sta ste napisali Generalna 2011-08-20T15:09:19Z gmk