************************************************** ********
Tipo di errore:
CDO.Message.1 (0x80040220)
Il valore di configurazione "SendUsing" non è valido.
************************************************** ********
Non so più che fare!!! Il componente che sto utilizzando è "cdosys.dll" e non c'è verso di farlo andare.
l'errore avviene sulla riga eMail.Send()
il mio codice
<%
'Impostiamo le nostre preferenze
Dim Destinatario, Mittente, Oggetto, Testo
Destinatario = "pippo@pippo.it"
Mittente = "pluto@pluto.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").V alue = 2
'eMail.Fields.Update()
'Inviamo la mail!
eMail.Send()
'Eliminiamo l'oggetto...
Set eMail = Nothing
%>
Grazie BRAVA GENTE!!!
Rispondi quotando
