per chi ha voglia....potreste modificarmi il codice per l'invio con cdosys? :rollo:


FUNCTION InviaMail(varMittente,varDestinatario,varOggetto,v arCorpo)

SET objMail = Server.CreateObject("CDONTS.NewMail")

objMail.From=varMittente

objMail.TO=varDestinatario

objMail.Subject=varOggetto

objMail.Body=varCorpo

objMail.importance=0

objMail.Send

SET objMail = NOTHING

END FUNCTION