Egy kis (vizuális) alaptörténet
1988-ban megjelent az első VBScript vagy (Visual Basic Scripting Edition) iteráció, és még mindig nagyon primitív változata volt ma. Az évek során megnőtt a könnyű és könnyű szkriptnyelvnek a Microsoft számára történő igénye. Emiatt a cég folyamatosan dolgozott, és 1996-ban megjelentette a nyilvánosság számára.
Ez egy egyszerű szkript, amely a COM (Component Object Model) alkalmazást használja a Microsoft operációs rendszeren belüli fájlok létrehozására, olvasására, frissítésére és törlésére. A Windows 98 kiadása óta minden számítógépen telepítve van. Nagyon sokoldalú annak köszönhetően, hogy a VBScript gazdag környezet beágyazható a programokba a Microsoft Script Control segítségével. Ezt gyakran az Internet Information Services, a Windows Script Host és az Internet Explorer alkalmazásával használják.
De ez elegendő a technikai jibber jabbertől. Menjünk le hozzá, és megtanuljuk megtanulni a számítógép beszélgetését!
Egyszeri használatú VBScripts
A vizuális alapszkript létrehozása nagyon egyszerű, és nem igényel különleges programokat. Bár vannak olyan programok, amelyek segítségével több, fejlettebb szkriptet írhatunk, a legtöbb programozó és az írószkriptekben használatos emberek csak a Microsoft Jegyzettömbjét használják.
Indítsuk el a folyamatot a Notepad megnyitásával. Miután megnyitotta a Notepad-ot, mindössze annyit kell tennie, hogy írja be a következő kódot, vagy egyszerűen másolja be és illessze be a notepad ablakba. Annak érdekében, hogy megváltoztassa, amit a szkript a számítógépet mond, egyszerűen cserélje ki azt a szakaszt, amely azt mondja: "A geeks örökölni fogja a földet", bármit is szeretne hallani.
dim speechobject set speechobject=createobject('sapi.spvoice') speechobject.speak 'The geeks shall inherit the earth'
Most, hogy megkapja a hangját, próbáljon meg még néhány szkriptet létrehozni minden olyan szöveggel, amelyet hallani szeretne. Alternatív megoldásként jobb egérgombbal kattints a VBScriptre és válaszd a "Megnyitás …" opciót, majd válaszd a jegyzettömböt, hogy szerkesztsd a szöveget ugyanabban a fájlban.
Szöveg-beszéd-parancsfájl
Most, hogy tudsz írni egy egyszer használatos szkriptet, és valószínűleg játszott vele párszor, lehet, hogy kissé unatkozik. Ezért fogjuk rágni egy rést.
A következő dolog, amit megtanulunk, hogyan kell létrehozni egy szkriptet, amely valamivel fejlettebb, mint az egyszeri használatú szkript. Ez létrehoz egy párbeszédpanelt, amelybe beírhatja a szöveget, és visszaolvashatja Önt számítógépével.
Indítsa el újra a jegyzettömböt, és írja be ezt a szkriptet, vagy másolja be és illessze be a notepad ablakba.
Dim message, sapi message=InputBox('What shall I say, your Geekness?','I speak for you.') Set sapi=CreateObject('sapi.spvoice') sapi.Speak message
Most lépjünk be: "A geek örökölni tudják a földet", majd nyomja meg az "OK" gombot a parancsfájl futtatásához és hangos szövegének meghallgatásához.
Üdvözlet VBScript Script
Ez nagyon szórakoztató, de a számítógéped még mindig nem érzi közelebbről veled. Most megpróbálunk egy másik egyszerű szkriptet, amely figyelembe veszi a napszakot és a megfelelő választ a napszakhoz. Ez a szkript fogja elolvasni a számítógéped idejét, és ennek alapján bizonyos módon üdvözölni fogja Önt.
Kezdje a jegyzetfüzet megnyitásával és beillesztve ezt a rövid szkriptet. A napi üdvözlettel rendelkező részeket kicserélheti bármelyik mondattal, és a Geekmeisteret saját nevével helyettesítheti.
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
A forgatókönyv azt mondja, hogy ha az óra 12 előtt elolvas valamit, reggel van, és bármi 12 után van délután; de van egy olyan záradéka is, amely azt is mondja, hogy ha 12 óra múlva van, amíg az idő múlt 16:00 (16:00), akkor este lesz.
A VBScript Script időszaka
Ha szeretnél egy kicsit fejlettebbé tenni és megkapod az időt, létrehozhatsz egy új jegyzettömböt, és írd be ezt a szkriptet.
A szkript bonyolultnak tűnhet, de lényegében azt mondja a számítógépnek, hogy mit mondjon és mit mondjon a számítógép óráján feltüntetett idő alapján. A "Jelenlegi idő" kifejezést bármikor beillesztheti a kívánt időre.
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
Most csak menteni kell a fájlt VBScript-ként, ahogyan az előző lépésekben is elvégezte, majd keresse meg azt a mappát. Ha minden jól megy, akkor be kell tudnia duplázni rá, és hallani a számítógépet az időről.
Üzembe helyezés üdvözlés
Most, hogy tudod, hogyan lehet a számítógéped üdvözölni és megmondani az időt, mennyire jó lenne, ha a számítógép ezt megtenné, amikor bekapcsolja a számítógépet. Valójában nagyon könnyű csinálni, ha csak a két szkriptet ötvözi, és helyesen helyezi el őket.
Kezdje a Microsoft jegyzettömb megnyitásával, és másolja ezt a kódot az ablakba. Ez egyszerűen egy példánya mindkét kód kombinált az Ön számára. Ne feledje, hogy megváltoztathatja az üdvözlést a következőre: "Mi a kedves haver, Hello Mester, Üdvözöllek a mindenható felségedre", vagy bármit, amit a számítógéped mondani szeretne.
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
Miután átmásolta ezt a kódot pontosan úgy, mint a jegyzettömb, folytassa és mentse el "Startup greeting.vbs" -ként. Azt is nevezhetjük, amit csak akarsz, de ennek a bemutatásnak a szempontjából egyszerűbb, ha mindannyian ugyanazon az oldalon vagyunk. Most, hogy mentésre került, duplán kattintva a VBScript fájlra hallhatja, hogy üdvözli Önt és megmondja Önnek az időt.
Ha valamilyen oknál fogva ez nem működik az Ön számára, kézzel is navigálhat az indító mappába. Először meglátogatja a mappát, ahol a "Startup greeting.vbs" mentése megtörténik és másolja. A következő lépés az, hogy írja be a következő elérési utat bármely Explorer ablakba, és nyomja meg az "Enter" billentyűt. Csak módosítania kell a (z) USERNAME alkalmazást a számítógépfiókhoz használt névvel.
C:UsersUSERNAMEAppDataRoamingMicrosoft WindowsStart MenuProgramsStartup
Miután az indító mappában voltál, csak illessze be a vbs fájlt, és jó vagy. Most, amikor legközelebb elindítja a számítógépet és bejelentkezik, automatikusan üdvözölni fogja Önt, és tájékoztatnia kell Önt arról, hogy milyen időpontban van.
- Geek teszt
- Üdvözlet
- Üzembe helyezés üdvözlés
- Megmondani az időt
- Szöveg beszéd