Dim speaks, speech <br />speaks="welcome to your pc, user name" <br />set speech=createobject("sapi.spvoice") <br />speech.speak speaks