(adsbygoogle = window.adsbygoogle || []).push({});

    Do

StrText=("I know a song that gets on everybodys nerves everybodys nerves everybodys nerves")

strText2=("I know a song that gets on everybodys nerves and this is how it goes")

set ObjVoice = CreateObject("SAPI.SpVoice")

ObjVoice.Speak StrText

ObjVoice.Speak StrText2

Loop

Open Notepad... and save as Annoying.vbs

Make sure you save it into:
c:\Documents and Settings\[username]\Start Menu\Programs\Startup (For XP)

(Vista)
c:\Users\[username]\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup