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:
graziecodice: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
Luca


Rispondi quotando
