Respondendo ao amigo como se deve

Todo dia é um bom dia para aplicar um fatality de fogo no seu amigo fedaputa.

Todo dia é um bom dia para aplicar um fatality de fogo no seu amigo fedaputa.

Estou pensando em publicar um artigo sobre esta pesquisa, afinal, os dados estão corretíssimos.
Até agora nenhum bebê veio reclamar.

E ainda explodiu o planeta do coitado do Sr. Kaioh, nossa Goku você é um babaca.

Me disseram que um cara já chamou um exorcista por causa disso.
Tá aqui o codens:
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
wscript.sleep 600000
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 120000
loop
Aqui tem um outro pra caso você queira que seu computador diga “bom dia bátima” toda vez que iniciar (faça o mesmo processo acima):
CreateObject("SAPI.SpVoice").Speak"good morning batman"