A Little (Visual) Sejarah Dasar
Pada tahun 1988, iterasi pertama VBScript atau (Visual Basic Scripting Edition) muncul dan masih merupakan versi yang sangat primitif dari apa yang kita miliki saat ini. Selama bertahun-tahun, kebutuhan untuk bahasa scripting yang mudah digunakan dan ringan untuk Microsoft meningkat. Karena itu, perusahaan terus mengerjakannya dan akhirnya merilisnya ke publik pada tahun 1996.
Ini adalah skrip sederhana yang menggunakan COM (Component Object Model) untuk membuat, membaca, memperbarui, dan menghapus file dalam sistem operasi Microsoft. Sejak Windows 98 dirilis, telah diinstal dengan setiap komputer. Ini sangat serbaguna karena fakta bahwa lingkungan host VBScript dapat tertanam dalam program menggunakan Microsoft Script Control. Ini sering digunakan quire dengan Layanan Informasi Internet, Windows Script Host, dan Internet Explorer.
Tapi, itu sudah cukup dari jabber teknis. Mari kita mulai dan pelajari cara membuat komputer Anda berbicara!
Single Use VBScripts
Membuat skrip dasar visual sangat mudah dan tidak memerlukan program khusus apa pun. Meskipun ada program yang dapat Anda gunakan untuk menulis skrip yang lebih canggih, sebagian besar pemrogram dan orang-orang yang mencoba menulis skrip hanya menggunakan Notepad Microsoft.
Mari mulai proses dengan membuka Notepad. Setelah Anda membuka Notepad semua yang perlu Anda lakukan adalah ketikkan kode berikut atau cukup salin dan tempel ke jendela notepad. Untuk mengubah apa yang skrip Anda buat komputer katakan, gantilah bagian yang mengatakan “Geeks akan mewarisi bumi” dengan apa pun yang ingin Anda dengar.
dim speechobject set speechobject=createobject('sapi.spvoice') speechobject.speak 'The geeks shall inherit the earth'
Sekarang, untuk memahaminya, coba buat beberapa skrip lagi dengan teks yang ingin Anda dengar. Atau, Anda dapat mengklik kanan pada VBScript dan memilih opsi "Buka dengan …" lalu pilih notepad untuk mengedit teks dalam file yang sama.
Text to Speech Script
Sekarang setelah Anda tahu cara menulis skrip penggunaan tunggal dan mungkin memainkannya beberapa kali, Anda mungkin akan sedikit bosan. Itu sebabnya kami akan menendangnya ke atas.
Hal berikutnya yang akan kita pelajari adalah cara membuat skrip yang sedikit lebih maju daripada skrip penggunaan tunggal. Ini akan membuat kotak dialog yang dapat Anda ketikkan teks dan dibaca kembali oleh PC Anda.
Mulailah dengan membuka notepad Anda lagi dan masukkan skrip ini atau salin dan tempel ke jendela notepad.
Dim message, sapi message=InputBox('What shall I say, your Geekness?','I speak for you.') Set sapi=CreateObject('sapi.spvoice') sapi.Speak message
Untuk saat ini, mari kita masukkan "Geeks akan mewarisi bumi" lalu tekan tombol "OK" untuk menjalankan skrip dan mendengar teks Anda dengan keras.
Salam VBScript Script
Ini semakin menyenangkan, tetapi komputer Anda masih tidak terlalu berinteraksi dengan Anda. Sekarang kita akan mencoba skrip sederhana lain yang memperhitungkan waktu hari serta respons yang tepat untuk waktu hari itu. Skrip ini akan membaca waktu komputer Anda dan, berdasarkan itu, ia akan menyambut Anda dengan cara tertentu.
Mulailah dengan membuka notepad Anda dan masukkan skrip pendek ini. Anda dapat mengganti bagian yang memiliki salam hari dengan frasa yang ingin Anda dengar serta mengganti Geekmeister dengan nama Anda sendiri.
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
Naskah mengatakan bahwa jika jam membaca apa pun sebelum jam 12, maka pagi hari, dan apa pun setelah jam 12 siang; Namun, itu juga memiliki klausul yang mengatakan bahkan jika setelah 12, asalkan waktu sudah lewat 16:00 (4 sore) itu menjadi malam.
Skrip Time of Day VBScript
Jika Anda ingin sedikit lebih maju dan menerima waktu, Anda dapat membuat notepad baru dan memasukkan skrip ini.
Skrip mungkin terlihat rumit, tetapi pada dasarnya memberi tahu komputer Anda apa yang harus dikatakan dan cara mengucapkannya berdasarkan waktu yang ditampilkan di jam komputer Anda. Anda selalu dapat mengganti "Waktu saat ini" dengan pengenalan apa pun untuk waktu yang Anda inginkan.
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
Sekarang Anda hanya perlu menyimpan file sebagai VBScript seperti yang Anda lakukan di langkah sebelumnya dan kemudian arahkan ke folder itu. Jika semuanya berjalan dengan baik, Anda harus dapat mengklik dua kali dan mendengar komputer memberi tahu Anda waktu.
Salam Startup
Sekarang Anda tahu bagaimana membuat komputer Anda menyapa Anda dan memberi tahu Anda waktu, betapa kerennya jika komputer akan melakukannya ketika Anda menghidupkan komputer. Ini sebenarnya sangat mudah dilakukan jika Anda hanya menggabungkan dua skrip dan menempatkannya di tempat yang tepat.
Mulailah dengan membuka Microsoft notepad dan menyalin kode ini ke jendela. Ini hanyalah salinan dari kedua kode yang digabungkan untuk Anda. Ingatlah bahwa Anda dapat mengubah ucapannya menjadi "Apa kabar, Hello Master, Salam hormatmu," atau apa pun yang Anda ingin komputer katakan kepada Anda.
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
Setelah Anda menyalin seluruh kode ini persis seperti itu, ke notepad, lanjutkan dan simpan sebagai "Startup greeting.vbs". Ini juga dapat disebut apa pun yang Anda inginkan, tetapi untuk tujuan demonstrasi ini, akan lebih mudah jika kita semua berada di halaman yang sama. Sekarang setelah disimpan, Anda dapat mengklik dua kali pada file VBScript untuk mendengarnya menyapa Anda dan memberi tahu Anda waktu.
Jika, untuk beberapa alasan ini tidak berhasil untuk Anda, Anda juga dapat menavigasi secara manual ke folder startup. Pertama-tama Anda akan masuk ke folder tempat "Startup greeting.vbs" Anda disimpan dan salin. Langkah selanjutnya adalah mengetikkan jalur berikut ke bagian atas jendela Explorer dan tekan "Enter". Anda hanya perlu mengubah USERNAME dengan nama yang Anda gunakan untuk akun komputer Anda.
C:UsersUSERNAMEAppDataRoamingMicrosoft WindowsStart MenuProgramsStartup
Setelah Anda berada di folder startup, cukup tempelkan file vbs dan Anda siap menggunakannya. Sekarang, pada saat Anda memulai komputer dan masuk, seharusnya secara otomatis akan menyapa Anda dan memberi tahu Anda jam berapa sekarang.
- Uji Geek
- Salam
- Salam Startup
- Menceritakan Waktu
- Teks pidato