<%
varF = request.form("quienloenvia")
varMMS = request.form("mensaje")
Dim objEmail
Set objEmail = Server.CreateObject("Persits.MailSender")
objEmail.Username = "
[email protected]"
objEmail.Password = "xsZYTokKv3dQe7A"
objEmail.Host = "mail.allhen.com"
objEmail.From = request.form("quienloenvia")
objEmail.FromName = request.form("nombreDeQuienLoEnvia")
objEmail.AddAddress request.form("destinatario")
objEmail.Subject = ""&varSn&" aqui el subject ...al inicio recoge una variable"
ObjEmail.IsHTML = True
objEmail.Body = "Mensaje:<br> "&varMMS&" <br><br><img src=""
http://tudominio.com/fotocualquiera.jpg"" border=""0"">"
objEmail.Send
Set objEmail = Nothing
response.write = "Mail enviado a : """&varF&""" <br> Puedes seguir enviando...."
%>
como ven.-- envia codigo html ...
y por si las dudas...el mail y el password.. funcionan...
asi q --- Gracias .. no ???
y por q coloco el codigo ?
por q muchas personas realmente lo necesitan.. .
pero hay algunos.. del foro... q se creeen q saben ... y no ayudan ..
mejor no digo nombres....
solo modifiquen el contenido del htm a enviar
si tiene dudas.. please contact me
[email protected]