make your computer speak:

    type the following code in notepad


    Dim message, sapi
    message=InputBox("What do you want me to say?","Speak to Me")
    Set sapi=CreateObject("sapi.spvoice")
    sapi.Speak message


    save it as xxx.vbs