Dim speaks, speech
speaks="Hi Mr. Jaka, Welcome to My World"
Set speech=CreateObject("sapi.spvoice")
speech.Speak speaks
Untuk tulisan "Hi Mr. Jaka, Welcome to My World" bisa kamu ganti sesuka hati, sehingga menjadi seperti ini:
Jika sudah, kemudian simpan dengan nama welcome.vbs
Cara di atas terkadang tidak berjalan di beberapa komputer yang tidak memiliki Driver Audio, dan bisa juga karena faktor lain.
- Lalu copy - paste file welcome.vbs tadi ke:
- Untuk Windows 7, 8, dan 8.1, C:\Users\USERNAME\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup
- Untuk Windows XP, C:\Documents and Settings\All Users\Start Menu\Programs\Startup
Cara di atas terkadang tidak berjalan di beberapa komputer yang tidak memiliki Driver Audio, dan bisa juga karena faktor lain.