Hola a todos.
tengo el siguiente problema enviando un email desde asp (servidor windows nt5, con iis, pero no se la version :\ es de DataMarkets): el codigo se ejecuta sin problemas, pero el email nunca llega :\
este es el codigo:
Código:
strBody = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">"
strBody = strBody & "<html>"
strBody = strBody & "<head>"
strBody = strBody & "<meta http-equiv=""Content-Type"""
strBody = strBody & "HTML = HTML & ""content=""text/html; charset=iso-8859-1"">"
strBody = strBody & "<title> Consulta </title>"
strBody = strBody & "</head>"
strBody = strBody & "<body>"
strBody = strBody & "<FONT FACE=Verdana,Arial SIZE=2 COLOR=#000000><BR><B>"
strBody = strBody & "<B>Nombre y apellido:</B> " & Trim(Request.Form("Nombre")) & "<br>"
strBody = strBody & "<B>Actividad:</B> " & Trim(Request.Form("Actividad")) & "<br>"
strBody = strBody & "<B>Ciudad:</B> " & Trim(Request.Form("Ciudad")) & "<br>"
strBody = strBody & "<B>E-Mail:</B> " & Trim(Request.Form("email")) & "<br>"
strBody = strBody & "<B>Mensaje:</B> " & Trim(Request.Form("Consulta")) & "<br>"
strBody = strBody & "<br>"
strBody = strBody & "<BR></body>"
strBody = strBody & "</html>"
Set objMsg = Server.CreateObject("CDONTS.NewMail")
objMsg.From = Trim(Request.Form("email"))
objMsg.To = "[email protected]"
objMsg.Subject = "Consulta desde el sitio web"
'objMsg.BodyFormat = 0
'objMsg.MailFormat = 0
objMsg.Value("Reply-To") = Trim(Request.Form("email"))
objMsg.Body = strBody
objMsg.Send
Set objMsg = Nothing
(suponemos qe las variables ya fueron correctamente declaradas y demas)
alguna idea :\?
muchas graciass (:
exitos