credo che devi cambiare l'oggetto CDONTS con CDOSYS.
fai una ricerca vedrai che trovi tutto quello che ti serve!
tiè beccate questo:
per eventuali altri problemi cè un 3d in rilievo specifico per i cambiamenti di server2003!codice:'invio email Dim MiaMail Set MiaMail = Server.CreateObject("CDO.Message") MiaMail.From = strEmailda MiaMail.To = strEmaila MiaMail.Cc = "" MiaMail.Bcc = "" MiaMail.Subject = (strTitolo) MiaMail.HTMLBody = strBody MiaMail.Fields("urn:schemas:httpmail:importance").Value = 2 MiaMail.Fields.Update() MiaMail.Send() Set MiaMail = Nothing