VBScript - Text to Speech/Play Sound

Create a .vbs file with the following code, and it will play a sound and also say something out loud of your choosing... neat huh?

Set oV = CreateObject("SAPI.SpVoice")
Set oFS = CreateObject("SAPI.SpFileStream")
oFS.Open "C:\Windows\Media\tada.wav"
oV.SpeakStream oFS
oFS.Close
oV.Speak "Hello World!"