Par Laurent BOURSEAUD, LABORATOIRE SUPINFO DES TECHNOLOGIES MICROSOFT Publiée le 01/06/2005 vers 13h.
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "adresse" objEmail.To = "adresse" objEmail.Subject = "Atl-dc-01 down" objEmail.Textbody = "Atl-dc-01 is no longeraccessible over the network." objEmail.Send