Salve a tutti
devo inviare email da un programma vbs e per farlo ho pensato di utilizzare, cosi come farei con asp, il metodo CDONTS.
il tutto gira su un server aziendale interno con a bordo win2000 professional.
tramite la funzionalità "on error resume next" e poi un if che controlla se err.number=0, verifico che non ci siano problemi o errori di ogni tipo.
non viene riscontrato nessun errore eppure... l'email non parte.
posto qui di seguito il codice:
codice:
destinatario = "destinatario@dominio.it"
mittente = "mittente@dominio.it"
oggetto = "..."
corpo = "in formato html"
set miaMail= CreateObject("CDONTS.NewMail")
miaMail.From = mittente
miaMail.To = destinatario
miaMail.Subject = oggetto
miaMail.BodyFormat = 0
miaMail.MailFormat = 0
miaMail.Importance = 0
miaMail.Body = corpo
miaMail.Send
Set miaMail = Nothing
grazie
Luca