Usei esse script para automatizar o envio das notícias do site que trabalho direto para o twitter.
Response.Buffer = True
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
usuarioTwitter = "usuario" 'troque pelo seu usuario do twitter
senhaTwitter = "senha" 'troque pela sua senha do twitter
novoPost = "Post usando HTTPRequest ASP" 'troque pelo conteudo do seu post
xml.Open "POST", "http://" & usuarioTwitter & ":" & senhaTwitter & "@twitter.com/statuses/update.xml?status=" & server.URLencode(novoPost), False
xml.setRequestHeader "Content-Type", "content=text/html; charset=iso-8859-1"
xml.Send
Response.Write xml.responseText 'A resposta do twitter
Set xml = Nothing
É possivel verificar o status da requisição e validar se rolou ou não a inclusão no sistema do twitter, por exemplo, substitua a linha da resposta(xml.responseText) por este código:
if xml.status = "200" then
response.write("Enviado com sucesso")
else
response.write("Falha no envio")
end if
Dúvidas entrem em contato
Abs