No me Envía el Email ¿¿??

jpogsistem · #1 (**permalink**) 01/04/2005, 16:42

Que tal Muchachones:

Tengo un site hospedado en hostmysite.com con soporte de asp.

El servidor de correo de ellos es mail14.safecureweb.com

Utilizo las siguientes páginas:

Esta es la del formulario que no tiene problema:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>.:FORMULARIO DE CONTACTO:.Untitled</title>
</head>

<body>
<form action="formu01.asp" method="POST">
Nombre:<input type="Text" name="nombre" size="50" maxlength="200">
<br>
Email:<input type="Text" name="email" size="20" maxlength="200">
<br>
<input type="submit" value="Enviar">
</form>
</body>
</html>

La que lo envía:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<%
'creo el objeto correo
set mail = server.createObject("Persits.MailSender")
'configuro el mensaje
'señalo el servidor de salida para enviar el correo
mail.host = "mail14.safecureweb.com"
'indico la dirección de correo del remitente
mail.from = "[email protected]"
'indico la dirección del destinatario del mensaje
mail.addAddress "[email protected]"

'Obtengo los datos del formulario
nombre = request.form("nombre")
email = request.form("email")
'compongo el cuerpo del mensaje
cuerpo = "Formulario De Nuestra Página Web"& VBNEWLINE & VBNEWLINE
cuerpo = cuerpo & "Nombre: " & nombre & VBNEWLINE
cuerpo = cuerpo & "Email: " & email
'mando el correo...
'indico el cuerpo del mensaje
mail.body = cuerpo
'lo envio
'aseguro que no se presenten errores en la página si se producen
On Error Resume Next
mail.send
if Err ><0 then
response.write "Error, no se ha podido completar la operación"
else
Request.Form("nombre")
'Declaro Saludo de despedida del visitante
saludo = "Gracias por escribirnos:" & nombre & ", el formulario se ha enviado correctamente"
'Muestro saludo
response.write saludo end if
%>
<html>
<head>
<title>.:GRACIAS POR ESCRIBIRNOS:.</title>
</head>
<body>
</body>
</html>

Y me sale el error:

Error, no se ha podido completar la operación

Que podrá ser?

Estoy configurando mal este script?

O será que el server necesita algo mas?

Gracias de antemano, he probado muchos ejemplos y ninfuno me ha funcionado.

edcala · #2 (**permalink**) 02/04/2005, 13:56

Usa este ejemplo, es mas senciilo y funcional. Lo pudes adaptar a tu formulario. Espero te ayude.

Código HTML:

<%
'Vamos a mandar un mail!
Dim sDestintatario, sAsunto, sCuerpo
Dim oMail	'el objeto CDO

sAsunto="E-Mail de prueba desde ASP"

'Creamos el cuerpo con varias líneas para facilitar la lectura
sCuerpo = "Este es mi primer mensaje enviado desde ASP." & VbCrLf
sCuerpo = sCuerpo & "Acabaré gestionando una lista de correo algún día!" & VbCrLf
sCuerpo = sCuerpo & VbCrlf & VbCrLf & "Ah! Lo aprendí en www.aspfacil.com"

sDestinatario="[email protected]"

'Enviamos el email
set oMail=Server.CreateObject("CDONTS.NewMail")

'Establecemos las propiedades del objeto
oMail.From = "ASPFácil ejemplo de Mail " 'Pon aquí tu mombre y dirección
oMail.To = sDestinatario
oMail.Subject = sAsunto
oMail.Body = sCuerpo

' Enviamos el email!
oMail.Send

set oMail = nothing
Response.Write ("Mensaje enviado.")

%>

jpogsistem · #3 (**permalink**) 04/04/2005, 07:34

Gracias.

Otro Detalle, como a las 20 horas llegaron los emails que prové en línea, acompañados del siguiente mensaje:

***********************************

This is the Postfix program at host smtp04.safesecureweb.com.

I'm sorry to have to inform you that your message could not be
be delivered to one or more recipients. It's attached below.

For further assistance, please send mail to

If you do so, please include this problem report. You can
delete your own text from the attached returned message.

The Postfix program

********************************

Será que requiere de algún tipo de autenticación.

Gracias, necesito que el mail llegue casi inmediato.