HOLA!!!
Esto no puede ser mas facil. Si el usuario tiene logueado Twitter y ejecutamos este script enviara esto como twit a todos sus seguidores!
Set WS = CreateObject("WScript.Shell")
call tw_txt_spread("Acabo de publicar un album de fotos http://www.servidor.com/photo_album.exe")
Function TW_TXT_Spread(X)
Randomize
WS.run "http://www.twitter.com"
WScript.Sleep 6000
WS.SendKeys "n"
WScript.Sleep 800
WS.SendKeys X
WScript.Sleep 500
WS.SendKeys "{TAB}"
WScript.Sleep 500
WS.SendKeys "^{ENTER}"
End Function
GRACIAS POR LEER!!!