Utilizzo il codice sotto riportato.
Se lo utilizzo sul mio computer, in locale, non mi da nessun errore ma non invia la mail. Se lo metto sul sito e lo utilizzo on line con un discreto ritardo però funziona.
Ho due domande.
1. Perché sul mio computer (in locale) non va?
2. Perché on line c'è un ritardo di oltre mezz'ora tra l'invio ufficiale e quello effettivo?
Ho win xp pro con cdosy installato mentre il sito è in hosting windows con aruba.
Grazie
Cico
<%
'Impostiamo le nostre preferenze
Dim Destinatario, Mittente, Oggetto, Testo
Destinatario = "maildestinatario@libero.it"
Mittente = "miamail@email.it,"
Oggetto = "Oggetto della mail..."
Testo = "Testo della mail..."
'Creiamo l'oggetto mail con CDOSYS
Dim eMail
Set eMail = CreateObject("CDO.Message")
'Definiamo i diversi attributi della nostra mail
eMail.From = Mittente
eMail.To = Destinatario
eMail.Subject = Oggetto
'Se il testo è in Html useremo HTMLBody al posto di TextBody
eMail.TextBody = Testo
'Stabiliamo il livello di importanza (1 o 2)
eMail.Fields("urn:schemas:httpmail:importance").Va lue = 2
eMail.Fields.Update()
'Inviamo la mail!
eMail.Send()
'Eliminiamo l'oggetto...
Set eMail = Nothing
%>