Pieni (visuaalinen) perushistoria
Vuonna 1988 ensimmäinen VBScriptin tai (Visual Basic Scripting Editionin) iterointi ilmestyi ja oli silti hyvin primitiivinen versio nykyisestä. Vuosien mittaan Microsoftin helppokäyttöisen ja kevyen komentotiedon kielen tarve kasvoi. Tämän vuoksi yhtiö jatkoi toimintaansa ja julkaisi sen lopulta yleisölle vuonna 1996.
Se on yksinkertainen komentosarja, joka käyttää COM-komponenttia (Object Component Model) luoda, lukea, päivittää ja poistaa tiedostoja Microsoftin käyttöjärjestelmissä. Koska Windows 98 on julkaistu, se on asennettu jokaiseen tietokoneeseen. Se on erittäin monipuolinen siksi, että VBScript-isäntäympäristö voidaan upottaa ohjelmissa, joissa käytetään Microsoft Script Control -ohjelmaa. Sitä käytetään usein Internet Information Servicesin, Windows Script Hostin ja Internet Explorerin avulla.
Mutta se riittää teknisestä jibber jabberistä. Päästäksemme siihen ja oppia tekemään tietokoneesi puhua!
Single Use VBScripts
Visuaalisen peruskäsikirjoituksen luominen on erittäin helppoa eikä vaadi erityisiä ohjelmia. Vaikka sinulla on ohjelmia, joiden avulla voit kirjoittaa enemmän kehittyneitä komentosarjoja, useimmat ohjelmoijat ja ihmiset, jotka käyttävät kirjoituskäsikirjoituksia, käyttävät vain Microsoftin Notepadia.
Aloitetaan prosessi avaamalla Muistio. Kun olet avannut Notepadin, sinun tarvitsee vain kirjoittaa seuraava koodi tai kopioi se ja liitä se notepad-ikkunaan. Jos haluat muuttaa mitä käsikirjoituksesi tekee tietokoneesta, vaihda vain kohta, jossa sanotaan: "Geeksit perivät maan" mitä haluat kuulla.
dim speechobject set speechobject=createobject('sapi.spvoice') speechobject.speak 'The geeks shall inherit the earth'
Nyt, saadaksesi sen roikkua, yritä luoda muutamia skriptejä millä tahansa tekstillä, jonka haluat kuulla. Vaihtoehtoisesti voit napsauttaa VBScript-ohjelmaa hiiren kakkospainikkeella ja valita "Avaa …" -vaihtoehdon ja valita muistiinpanon muokata tekstiä samassa tiedostossa.
Teksti puheeksi
Nyt, kun tiedät, miten kirjoitat yhden käyttökäsikirjoituksen ja olet luultavasti toistanut sen muutaman kerran, saatat olla hieman tylsistynyt. Siksi aiomme potkia sitä ylös.
Seuraava asia, josta opimme, on luoda komentosarja, joka on hieman edistyksellisempi kuin yksittäiskäyttöinen käsikirjoitus. Tämä luo valintaikkunan, jonka avulla voit kirjoittaa tekstiä tietokoneeseen ja lukea sen tietokoneellesi.
Aloita avaamalla muistilappusi uudelleen ja kirjoittamalla tämä skripti tai kopioimalla ja liittämällä se muistilappuikkunaan.
Dim message, sapi message=InputBox('What shall I say, your Geekness?','I speak for you.') Set sapi=CreateObject('sapi.spvoice') sapi.Speak message
Anna nyt kirjoittaa "Geeksit perivät maan" ja paina sitten "OK" -painiketta suorittaaksesi komentosarjan ja kuulemaan tekstisi ääneen.
Terveisiä VBScript Script
Tämä on melko hauskaa, mutta tietokoneesi ei vieläkään ole kovinkaan vuorovaikutuksessa kanssasi. Nyt yritämme kokeilla toista yksinkertaista komentosarjaa, jossa otetaan huomioon kellonaika sekä asianmukainen vastaus ajankohtana. Tämä käsikirjoitus lukee tietokoneesi ajan, ja sen perusteella se tervehtii sinua tietyllä tavalla.
Aloita avaamalla muistilappu ja lisäämällä tämä lyhyt skripti. Voit korvata osion, jolla on tervehdykset päivästä tahansa lausetta, jota haluat kuulla ja korvata Geekmeisterin omalla nimelläsi.
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
Käsikirjoitus kertoo, että jos kellonaika lukee jotain ennen 12: ta, se on aamu, ja että kaikki 12 jälkeen on iltapäivä; mutta siinä on myös lauseke, joka sanoo, vaikka se kestää 12, kunhan aika on kulunut klo 16.00 (16.00), siitä tulee ilta.
Päivän aika VBScript-komentotiedosto
Jos haluat saada vähän kehittyneempää ja vastaanottaa aikaa, voit luoda uuden muistilehteen ja kirjoittaa tämän komentosarjan.
Skripti voi näyttää monimutkaiselta, mutta se kertoo tietokoneellesi mitä sanoa ja miten sanoa se tietokoneesi kelloon näytettävän ajan perusteella. Voit aina korvata "Nykyinen aika on" minkä tahansa esittelyn ajan, jonka haluat.
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
Nyt sinun on vain tallennettava tiedosto VBScriptin tavoin kuin edellisissä vaiheissa, ja siirry sitten kyseiseen kansioon. Jos kaikki meni hyvin, sinun pitäisi pystyä kaksoisnapsauta sitä ja kuulla tietokoneen kertoa sinulle aika.
Käynnistyksen tervehdys
Nyt, kun tiedät, miten tietokoneesi tervehtii sinua ja kertoo sinulle aikaa, kuinka hienoa olisi, jos tietokone tekisi sen, kun käynnistät tietokoneen. On todella helppo tehdä, jos yhdistät vain kaksi skriptiä ja laita ne oikeaan paikkaan.
Aloita avaamalla Microsoftin muistio ja kopioimalla tämä koodi ikkunaan. Se on yksinkertaisesti kopio molemmista koodeista, jotka on yhdistetty sinulle. Muista, että voit vaihtaa tervehdyksen "Mikä on kaveri, Hei mestari, Tervehtävä kaikkivaltias korkeutesi" tai mitä haluat tietokoneellesi sanomaan sinulle.
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
Kun olet kopioinut koko koodin tarkalleen sellaisenaan, vaihda se muistioon ja tallenna se nimellä "Startup greeting.vbs". Sitä voidaan kutsua myös mitä haluat, mutta tämän esittelyn kannalta on helpompaa, jos olemme kaikki samalla sivulla. Nyt, kun se on tallennettu, voit kaksoisnapsauttaa VBScript-tiedostoa kuullaksesi sen tervehdyttävän sinua ja kertoa sinulle aika.
Jos jostain syystä tämä ei toimi sinulle, voit siirtyä manuaalisesti myös käynnistyskansioon. Siirry ensin kansioon, jossa "Startup greeting.vbs" tallennetaan ja kopioidaan. Seuraava vaihe on kirjoittaa seuraava polku Explorerin ikkunan yläosaan ja paina Enter. Sinun tarvitsee vain vaihtaa USERNAME käyttäjänimesi kanssa, jota käytät tietokoneesi tilille.
C:UsersUSERNAMEAppDataRoamingMicrosoft WindowsStart MenuProgramsStartup
Kun olet käynnistyskansioon, liitä vain vbs-tiedosto ja olet hyvä mennä. Nyt, kun käynnistät tietokoneen seuraavan kerran ja kirjaudut sisään, sen pitäisi automaattisesti tervehtiä sinua ja ilmoittaa sinulle, mihin aikaan se on.
- Geek-testi
- Tervehdys
- Käynnistyksen tervehdys
- Kertoo aika
- Teksti puheeksi