Mala (vizualna) temeljna povijest
Godine 1988. pojavila se prva iteracija VBScript-a ili (Visual Basic Scripting Edition) i još uvijek bila vrlo primitivna verzija onoga što imamo danas. Tijekom godina, potreba za jednostavnim i laganim skriptnim jezikom za Microsoft je povećana. Zbog toga je tvrtka nastavila raditi na njemu i konačno ga je objavila 1996. godine.
To je jednostavna skripta koja koristi COM (Component Object Model) za stvaranje, čitanje, ažuriranje i brisanje datoteka u Microsoftovim operativnim sustavima. Budući da je Windows 98 izdan, instaliran je s svakim računalom. Vrlo je svestran zbog činjenice da se VBScript host okruženje može ugraditi u programe pomoću programa Microsoft Script Control. Koristi se često pomoću Internet Information Services, Windows Script Host i Internet Explorera.
Ali, to je dovoljno tehničke jibber jabber. Spustimo se i naučimo kako razgovarati vaše računalo!
Jednokratna upotreba VBScripts
Izrada vizualne osnovne skripte je vrlo jednostavna i ne zahtijeva nikakve posebne programe. Iako postoje programi koji možete koristiti za pisanje više naprednih skripti, većina programera i ljudi koji se bore u pisanju skripti koriste samo Microsoftovu Notepad.
Započnimo postupak otvaranjem Notepada. Nakon što otvorite Notepad, sve što trebate učiniti jest upisati sljedeći kod ili jednostavno kopirati i zalijepiti ga u prozor s notama. Da biste promijenili ono što skripta čini računalu, jednostavno zamijenite odjeljak koji kaže: "Gejevi će naslijediti zemlju" s onim što želite čuti.
dim speechobject set speechobject=createobject('sapi.spvoice') speechobject.speak 'The geeks shall inherit the earth'
Sada, da biste ga objesili, pokušajte stvoriti još nekoliko skripti s bilo kojim tekstom koji želite čuti. Alternativno, možete desnom tipkom miša kliknuti VBScript i odabrati opciju "Open with …", a zatim odabrati notepad za uređivanje teksta unutar iste datoteke.
Tekst u govorne skripte
Sada kad znate napisati jednu uporabu skripte i vjerojatno ste se igrali s njom nekoliko puta, možda ćete biti malo dosadno. Zato ćemo ga pokrenuti.
Sljedeća stvar koju ćemo naučiti jest kako stvoriti skriptu koja je nešto naprednija od skripte za pojedinačno korištenje. To će stvoriti dijaloški okvir u koji možete upisati tekst i čuti ga na računalu.
Započnite ponovnim otvaranjem notepada i unosom ove skripte ili kopirajte i zalijepite je u prozor s notama.
Dim message, sapi message=InputBox('What shall I say, your Geekness?','I speak for you.') Set sapi=CreateObject('sapi.spvoice') sapi.Speak message
Za sada, unesite "Geeks će naslijediti zemlju", a zatim pritisnite "OK" gumb za pokretanje skripte i čuti vaš tekst glasno.
Pozdrav VBScript skriptu
Ovo je prilično zabavno, ali vaše računalo još uvijek ne interakcije s vama jako puno. Sada ćemo probati još jednu jednostavnu skriptu koja uzima u obzir doba dana, kao i odgovarajući odgovor za doba dana. Ova skripta će pročitati vrijeme vašeg računala i na temelju toga će vas pozdraviti na određeni način.
Započnite otvaranjem notepada i umetanjem ove kratke skripte. Možete zamijeniti dio koji ima pozdrave dana s bilo kojim izrazom koji želite čuti, kao i zamijeniti Geekmeister s vlastitim imenom.
Set Sapi = Wscript.CreateObject('SAPI.SpVoice') dim str if hour(time) < 12 then Sapi.speak 'Good Morning Geekmeister ' else if hour(time) > 12 then if hour(time) > 16 then Sapi.speak 'Good evening Geekmeister ' else Sapi.speak 'Good afternoon Geekmeister ' end if end if end if
Skripta kaže da ako sat čita ništa prije 12, to je jutro, i da je sve poslije 12 sati poslijepodne; međutim, ona također ima klauzulu koja kaže da čak i ako je nakon 12, sve dok je vrijeme proteklo 16:00 (16:00) postaje večer.
Vremenski dan VBScript skripte
Ako biste željeli malo naprednije i primati vrijeme, možete stvoriti novu notepad i unijeti ovu skriptu.
Skripta može izgledati komplicirano, ali u suštini govori vašem računalu što reći i kako to reći temeljeno na vremenu koje se prikazuje na satu vašeg računala. Uvijek možete zamijeniti "Trenutačno vrijeme" s bilo kojim uvodom za vrijeme koje želite.
Set Sapi = Wscript.CreateObject('SAPI.SpVoice') Sapi.speak 'The current time is'
if hour(time) > 12 then Sapi.speak hour(time)-12 else if hour(time) = 0 then Sapi.speak '12' else Sapi.speak hour(time) end if end if
if minute(time) < 10 then Sapi.speak 'o' if minute(time) < 1 then Sapi.speak 'clock' else Sapi.speak minute(time) end if else Sapi.speak minute(time) end if
if hour(time) > 12 then Sapi.speak 'P.M.' else if hour(time) = 0 then if minute(time) = 0 then Sapi.speak 'Midnight' else Sapi.speak 'A.M.' end if else if hour(time) = 12 then if minute(time) = 0 then Sapi.speak 'Noon' else Sapi.speak 'P.M.' end if else Sapi.speak 'A.M.' end if end if end if
Sada samo trebate spremiti datoteku kao VBScript kao što ste učinili u prethodnim koracima, a zatim se kretali do te mape. Ako sve ide dobro, trebali biste dvostruko kliknuti na nju i čuti računalo da vam kaže vrijeme.
Početni pozdrav
Sada kada znate kako vas računalo pozdraviti i reći vam vrijeme, kako bi bilo cool ako bi računalo to učinilo kada uključite računalo. To je vrlo lako napraviti ako samo kombinirate dva skripta i stavite ih na pravo mjesto.
Započnite otvaranjem Microsoftovog notepada i kopiranjem ovog koda u prozor. To je jednostavno kopija oba koda koji su vam kombinirani. Ne zaboravite da možete pozdraviti poruku "Što je dude, Hello Master, Pozdravite svemoguću visoku nadmoć", ili bilo što želite da vam računalo kaže.
Set Sapi = Wscript.CreateObject('SAPI.SpVoice') dim str if hour(time) < 12 then Sapi.speak 'Good Morning Geekmeister ' else if hour(time) > 12 then if hour(time) > 16 then Sapi.speak 'Good evening Geekmeister ' else Sapi.speak 'Good afternoon Geekmeister ' end if end if end if Sapi.speak 'The current time is'
if hour(time) > 12 then Sapi.speak hour(time)-12 else if hour(time) = 0 then Sapi.speak '12' else Sapi.speak hour(time) end if end if
if minute(time) < 10 then Sapi.speak 'o' if minute(time) < 1 then Sapi.speak 'clock' else Sapi.speak minute(time) end if else Sapi.speak minute(time) end if
if hour(time) > 12 then Sapi.speak 'P.M.' else if hour(time) = 0 then if minute(time) = 0 then Sapi.speak 'Midnight' else Sapi.speak 'A.M.' end if else if hour(time) = 12 then if minute(time) = 0 then Sapi.speak 'Noon' else Sapi.speak 'P.M.' end if else Sapi.speak 'A.M.' end if end if end if
Nakon što kopirate ovaj cijeli kôd točno onako kako jest, u notepad, idite naprijed i spremite ga kao "Startup greeting.vbs". Također se može zvati bilo što što želite, ali za potrebe ove demonstracije lakše je da smo svi na istoj stranici. Sada kada je spremljen, možete dvaput kliknuti na VBScript datoteku da biste je čuli da vas pozdravljaju i da vam kažu vrijeme.
Ako iz nekog razloga ovo ne funkcionira za vas, možete ručno kretati do mape za pokretanje. Prvo ćete ići u mapu u kojoj će se spremiti "Startup greeting.vbs" i kopirati. Sljedeći korak je upisivanje sljedećeg puta na vrh bilo kojeg prozora Istraživanja i pritisnite "Enter". Samo trebate promijeniti USERNAME s imenom koje upotrebljavate za račun vašeg računala.
C:UsersUSERNAMEAppDataRoamingMicrosoft WindowsStart MenuProgramsStartup
Nakon što se nalazite u mapi za pokretanje, zalijepite datoteku vbs i dobro ćete ići. Sada, sljedeći put kada pokrenete računalo i prijavite se, ona bi vas automatski pozdravila i obavijestiti vas o tome koliko je sati.
- Geek test
- Pozdrav
- Početni pozdrav
- Govori vrijeme
- Tekst u govor
