salve ragazzi,
ho il seguente script che mi invia la posta:
Dim Destinatario, Mittente, Oggetto, Testo
Destinatario = "valentino.greco@poste.it"
Mittente = "info@divingservice.it"
Oggetto = "prova"
Testo = "testo"
'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.AddAttachment "CROCIERA _NOVEMBRE.zip"
eMail.Send()
'Eliminiamo l'oggetto...
Set eMail = Nothing
mi da errore alla riga dove vi è AddAttachment dicendo: 'Protocollo specificato sconosciuto.'
perchè?![]()