Ciao a tutti.
Sto utilizzando questo script per l'invio di un'email.
Cosa ha che non va?
Non restituisce alcun errore e non recapita alcuna email.
Ho fatto le prove del caso ovvero cambiando l'email del destinatario, con diversi indirizzi di diferrenti provider, ed è da settimane che tento di riuscirci ma senza risultato.

Ecco il codice:


Dim objMail
Set objMail = CreateObject("CDONTS.NewMail")

objMail.From = "info@miosito.it"

objMail.To = "miaemail@mail.it"

objMail.Subject = "Prova invio

objMail.BodyFormat = 0 ' 0 Testo; 1 HTML
objMail.MailFormat = 0 ' 0 Testo; 1 HTML

' Valore di priorità (opzionale)
objMail.Importance = 0

' Indirizzo per risposte (opzionale)
objMail.Value("Reply-To") = "miaemail@mail.it"

' Corpo del messaggio
objMail.Body = "ciao"

objMail.Send()

Set objMail = Nothing


Non vedo errori, mi aiutereste?
Grazie a quanti risponderanno