codice:
Dim eml, config
Set eml= Server.CreateObject("CDO.Message")
Set config= Server.CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True

With eml
Set .Configuration = config 
.From= email
.to ="xxx@xxxxxxx.com"
.Subject= "NUOVO CONTATTO"
.HTMLBody= testo
.Send
end with
Set Flds= nothing
Set config= nothing
Set eml= nothing
Roby