<%


strbody="hola!!!"
Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.To = "iivanoff@i2off.org"
objCDO.From = "avatar@i2off.org"
objCDO.Subject = "Mailing List - Nueva persona"
objCDO.BodyFormat = 0 
objCDO.MailFormat = 0 
objCDO.Body = strBody
objCDO.Send
set objCDO = nothing	


			response.write ("ok2")
%>