2024 Autor: Peter John Melton | [email protected]. Ostatnio zmodyfikowany: 2024-01-31 06:10
Mała (wizualna) podstawowa historia
W 1988 r. Pojawiła się pierwsza iteracja VBScript lub (Visual Basic Scripting Edition) i wciąż była to bardzo prymitywna wersja tego, co mamy dzisiaj. Z biegiem lat, potrzeba łatwego w użyciu i lekkiego języka skryptowego dla Microsoft wzrosła. Z tego powodu firma kontynuowała pracę nad nią i ostatecznie opublikowała ją w 1996 roku.
Jest to prosty skrypt wykorzystujący COM (Component Object Model) do tworzenia, odczytywania, aktualizowania i usuwania plików w systemach operacyjnych Microsoft. Od czasu wydania Windows 98 został zainstalowany na każdym komputerze. Jest wysoce uniwersalny, ponieważ środowisko hosta VBScript może być osadzone w programach za pomocą Microsoft Script Control. Często używa się go w Internetowych usługach informacyjnych, Hostach skryptów systemu Windows i Internet Explorer.
Ale to wystarczająca ilość technicznego bełkotu. Zróbmy to i nauczmy się, jak sprawić, by twój komputer mówił!
Single VBScripts
Tworzenie wizualnego skryptu podstawowego jest bardzo proste i nie wymaga żadnych specjalnych programów. Chociaż istnieją programy, których można używać do pisania bardziej zaawansowanych skryptów, większość programistów i osób, które zajmują się pisaniem skryptów, używają Notatnika Microsoft.
Rozpocznijmy proces od otwarcia Notatnika. Po otwarciu Notatnika wystarczy, że wpiszesz poniższy kod lub po prostu skopiujesz go i wkleisz w oknie notatnika. Aby zmienić to, co twój skrypt sprawia, że komputer mówi, po prostu zastąp fragment, który mówi: "Geekowie odziedziczą ziemię" z czymkolwiek, co chcesz usłyszeć.
dim speechobject set speechobject=createobject('sapi.spvoice') speechobject.speak 'The geeks shall inherit the earth'
Teraz, aby się o tym przekonać, spróbuj stworzyć jeszcze kilka skryptów z dowolnym tekstem, który chcesz usłyszeć. Możesz też kliknąć prawym przyciskiem myszy na VBScript i wybrać opcję "Otwórz za pomocą …", a następnie wybrać notatnik, aby edytować tekst w tym samym pliku.
Skrypt tekstowy do mowy
Teraz, kiedy już wiesz, jak napisać scenariusz jednorazowego użytku i prawdopodobnie grałeś z nim kilka razy, możesz się trochę nudzić. Właśnie dlatego zamierzamy podnieść poprzeczkę.
Następną rzeczą, jaką nauczymy się, jest stworzenie skryptu, który jest nieco bardziej zaawansowany niż skrypt jednorazowego użytku. Spowoduje to utworzenie okna dialogowego, w którym można wpisać tekst i odesłać go do komputera.
Zacznij od ponownego otwarcia notatnika i wprowadzenia tego skryptu lub skopiowania i wklejenia go do okna notatnika.
Dim message, sapi message=InputBox('What shall I say, your Geekness?','I speak for you.') Set sapi=CreateObject('sapi.spvoice') sapi.Speak message
Na razie wpiszmy "Geekowie odziedziczą ziemię", a następnie naciśnij przycisk "OK", aby uruchomić skrypt i usłyszeć głos na głos.
Pozdrowienia Skrypt VBScript
Jest to całkiem zabawne, ale twój komputer nadal nie jest z Tobą w bardzo dużym stopniu. Teraz spróbujemy innego prostego skryptu, który uwzględni porę dnia, a także odpowiednią odpowiedź na porę dnia. Ten skrypt odczytuje czas twojego komputera i na tej podstawie przywita Cię w określony sposób.
Zacznij od otwarcia notatnika i wstawienia tego krótkiego skryptu. Możesz zamienić sekcję z pozdrowieniami danego dnia na dowolną frazę, którą chcesz usłyszeć, a także zastąpić Geekmeister własnym imieniem.
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
Skrypt mówi, że jeśli zegar odczytuje cokolwiek przed 12, jest poranek, a cokolwiek po 12 jest po południu; jednak ma również klauzulę, która mówi, że nawet jeśli jest po 12, tak długo, jak czas upływa o 16:00 (16), staje się wieczorem.
Skrypt VBScript czasu
Jeśli chcesz trochę bardziej zaawansowany i otrzymać czas, możesz utworzyć nowy notatnik i wprowadzić ten skrypt.
Skrypt może wyglądać skomplikowanie, ale zasadniczo mówi komputerowi, co ma powiedzieć i jak to powiedzieć na podstawie czasu pokazywanego na zegarze komputera. Zawsze możesz zastąpić "Obecny czas" dowolnym wprowadzeniem na czas, który chcesz.
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
Teraz wystarczy zapisać plik jako skrypt VBScript, tak jak w poprzednich krokach, a następnie przejść do tego folderu. Jeśli wszystko poszło dobrze, powinieneś być w stanie dwukrotnie kliknąć i usłyszeć, jak komputer informuje Cię o czasie.
Powitanie startowe
Teraz, gdy wiesz, jak sprawić, by Twój komputer Cię pozdrowił i poinformował Cię o czasie, jak fajnie byłoby, gdyby komputer zrobił to po włączeniu komputera. W rzeczywistości jest to bardzo proste, jeśli połączysz te dwa skrypty i umieścisz je we właściwym miejscu.
Zacznij od otwarcia notatnika Microsoft i skopiowania tego kodu do okna. Jest to po prostu kopia obu kodów połączona z tobą. Pamiętaj, że możesz zmienić powitanie na "Co słychać, Witaj Mistrzu, Pozdrawiaj swoją wszechmocną wysokość" lub cokolwiek chcesz, żeby twój komputer powiedział ci.
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
Po skopiowaniu całego kodu dokładnie tak, jak jest, do notatnika, zapisuj go jako "Startup greeting.vbs". Można go nazwać dowolnie, ale dla celów tej demonstracji łatwiej jest, gdy wszyscy jesteśmy na tej samej stronie. Teraz, gdy został zapisany, możesz dwukrotnie kliknąć plik VBScript, aby usłyszeć, że Cię witają i powiedzieć Ci godzinę.
Jeśli z jakiegoś powodu nie działa to dla ciebie, możesz również ręcznie przejść do folderu startowego. Najpierw przejdź do folderu, w którym zapisano "Startup greeting.vbs" i skopiuj go. Następnym krokiem jest wpisanie następującej ścieżki w górnej części dowolnego okna Eksploratora i wciśnięcie "Enter". Wystarczy zmienić USERNAME pod nazwą, której używasz na swoim koncie komputerowym.
C:UsersUSERNAMEAppDataRoamingMicrosoft WindowsStart MenuProgramsStartup
Gdy jesteś w folderze startowym, po prostu wklej plik vbs i jesteś gotowy. Teraz, gdy następnym razem uruchomisz komputer i zalogujesz się, powinien on automatycznie Cię pozdrowić i poinformować o tym, która jest godzina.
- Test geek
- Powitanie
- Powitanie startowe
- Telling Time
- Tekst na mowę
Zalecana:
Głupie sztuczki: zmierzyć jak daleko twoja mysz się poruszyła
Czy zastanawiałeś się kiedyś, jak daleko przesunąłeś mysz? Możesz być zaskoczony, gdy zobaczysz, że nie zajmuje to dużo czasu, zanim Twoja mysz przesunęła się o kilka mil.
Głupie sztuczki: jak sprawić, by Mac OS X stał się dziwny
Oto naprawdę głupia sztuczka maniaków dla użytkowników komputerów Mac: możesz zmusić system OS X do myślenia podczas minimalizowania okna z szybkim czasem i poleceniem terminalu.
Głupie sztuczki: Jak pobrać Firefox na nowym komputerze bez używania Internet Explorera
Hakerzy przeglądarki Internet Explorer często twierdzą, że jedynym dobrym sposobem korzystania z przeglądarki Internet Explorer jest pobieranie Firefoksa lub przeglądarki Chrome. Ale jeśli naprawdę nie lubisz IE, możesz użyć wbudowanej obsługi FTP systemu Windows, aby pobrać i zainstalować Firefoksa bez otwierania IE.
Głupie sztuczki: jak narysować krzywą Batmana w wyszukiwarce Google
W ubiegłym roku Google dodał możliwość drukowania wykresów, które pozwalają na wykreślenie funkcji matematycznych bezpośrednio na stronie wyników wyszukiwania Google. Oto jak zrobić logo Batmana.
Głupie sztuczki: Jak grać Tetris w uTorrent
Czy trzeba było czekać na zakończenie pobierania i żałować, że nie można grać w Tetris? Nawet jeśli nigdy nie byłeś w takiej sytuacji, możesz użyć tej sztuczki, aby zwiększyć swoje umiejętności maniaków, gdy następnym razem przyjdą przyjaciele.