Necesitas un puerto abierto, por ejemplo, gmail 587, otros 25, depende de tu email, no conozco hotmail, creo que este no aguanta SMTP ni pop solo webmail excepto para hotmails americanos.
Aquí pongo un mxs básico, replazas lo que necesite ser remplazado, como tu email, nombre, host etc (las valores de las variables locals).
Ya lo he probado con gmail, y funciona bien, sólo copias y pegas este código en un.ms y lo guardas en algún directorio.
En la diálogo render vas al ut script y aplicas este script a la opción postrender, (esto lo repites cada vez que quieras enviar algo).
Si está bien configurado, y la internet, y el firewall, debería enviar el email.
Correos como hotmail creo que solo admiten 10 Mb max, así que, no envíes animaciones grandes.
Apenas termine de enviar(usualmente algunos segundos)max vuelve a estar activo.
Solo envía el archivo si este existe, es decir si el render fue exitoso. No envía desde el VFB.
El password no estaría encriptado.
Código:
(clearlistener(). -// ruraq notes // do not use special characters tif doesfileexist rendoutputfilename then t(t local efrom = usuariox@correo, com -from local efromname = nombre local eto = xxxx@correo, com -to local etoname = señor xxxx local esubject = job render -subject local ebody = render done. -body local attachfiles = rendoutputfilename local ehost = SMTP, gmail.com -host local eport = 587 local euser = usuariox -user local epass = Top Secret -pas t local email = dotnetobject system. Net. Mail. Mailmessage t email, from = dotnetobject system. Net. Mail. Mailaddress efrom efromname email, to, add (dotnetobject system. Net. Mail. Mailaddress eto etoname) email, subject = esubject email, body = ebody email, attachments, add (dotnetobject system. Net. Mail. Attachment attachfiles) t local SMTP = dotnetobject system. Net. Mail. Smtpclient SMTP, host = ehost SMTP, port = eport. -SMTP, usedefaultcredentials = false SMTP. Credentials = dotnetobject system. Net. Networkcredential euser epass SMTP. Enablessl = true try(t displaytempprompt //// sending render. 5000 SMTP, send email replaceprompt //// send done format render sent to:%\nEto )catch() email, attachments, dispose () ok t) telse no output render. )
.