Hola buenas a todos.
Mi problema es el siguiente:
Quiero mandar un a un correo que recogo desde una pagina html.
Me dice que si fue enviado pero al mirar mi correo, no aparece ningun mensaje.
Mi codigo es este.
Código ASP:
Ver original<%Option Explicit
Dim email
Dim mail
email = request.form("correo")
'creo el objeto correo
Set Mail = Server.CreateObject("SMTPsvg.Mailer")
'configuro el mensaje
'señalo el servidor de salida para enviar el correo
Mail.RemoteHost = "smtp.1and1.es"
'indico la dirección de correo del remitente
Mail.FromName = "prueba"
'indico la dirección del destinatario del mensaje
Mail.FromAddress= email
Mail.Username = "*****"
Mail.Password = "****"
Mail.AddRecipient "*****" , "******"
'indico el asunto
Mail.Subject = "pedidos"
'indico el cuerpo del mensaje
Mail.BodyText = "Gracias por realizar el pedido. "
'lo envio
'aseguro que no se presenten errores en la página si se producen
On Error Resume Next
if Mail.SendMail then
' Message sent sucessfully
response.write ("Your message was sent")
else
' Message send failure
response.write ("Your message was not sent. ")
response.write ("The error was: " & Mail.Response)
end if
Mail.send
set Mail=Nothing
'http://faq.1and1.es/programacion/asp/8.html
'http://www.chilered.com/ayuda/aspmail_uso.shtml
%>
Gracias por su tiempo.