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