Email CDONTS

Galera,

Estou fazendo um teste de envio de um simples email pelo CDONTS com o código abaixo, não da erro nenhum, mas tb não recebo a mensagem. O que será?

CODE
nome = "Adriano"
email = "adrianosluz@terra.com.br"

mensagem = "Mensagem de teste"

Set objeto = Server.CreateObject("CDONTS.NewMail")

objeto.From = "adrianosluz@terra.com.br"

objeto.To = "adrianosluz@terra.com.br"

objeto.Subject = "Assunto teste"

objeto.Bodyformat = 0

objeto.MailFormat = 0

 objeto.Body = "Olá <b>seu nome</b>!<br><b>"& nome &"</b> enviou uma mensagem para você!<br><br>Mensagem: "& mensagem &""

 objeto.Send

 Set objeto = Nothing response.write "Sua mensagem foi enviada com sucesso!"