problema con AspEmail

adn_aguilera · #1 (**permalink**) 08/05/2003, 16:41

tengo un código sencillo que estoy tratando de utilizar de prueba antes de hacer una página más completa. El código lo copié y modifiqué de un mensaje de este foro. La página no me envía ningún mensaje de error, todo funciona como debería de ser. el problema es que no envía ningún correo, y no tengo la menor idea de por qué. Si alguien me puede ayudar se lo agradezco.

este es el código:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="CP_ACP"%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "localhost"
Mail.From = "[email protected]"
Mail.FromName = "Contactos desde el Boletin" Mail.AddAddress "[email protected]"
Mail.AddAddress "adn"
Mail.Subject = "prueba"
Mail.Body = "texto"

On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error encountered: " & Err.Description
End If
%>
</body>
</html>

maestro · #2 (**permalink**) 08/05/2003, 16:44

Si no da ningun error el problema esta en la cola de tu SMTP, hace tiempo alguien cometno lo mismo, busca en los mensajes antiguos

choroy · #3 (**permalink**) 09/05/2003, 12:29

Será lo que dice maestro, porque a mi me pasa lo mismo y tampoco se lo que puede ser, pero de todas maneras cambia esto en tu codigo:

Mail.FromName = "Contactos desde el Boletin" Mail.AddAddress "[email protected]"
Mail.AddAddress "adn"

Por esto:

Mail.FromName = "Contactos desde el Boletin"
Mail.AddAddress [email protected]

Un saludo

elsabio · #4 (**permalink**) 09/05/2003, 14:05

Hola tengo el mismo problema:

<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "localhost" ' Este debe cambiara o queda asi?
Mail.From = "[email protected]"
Mail.FromName = "Contactos desde el Boletin"
Mail.AddAddress "[email protected]"
Mail.AddAddress "adn"
Mail.Subject = "prueba"
Mail.Body = "texto"

On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error encountered: " & Err.Description
End If
%>

choroy · #5 (**permalink**) 09/05/2003, 14:23

Bueno pues a mi ya me funciona, lo unico que le he hecho a sido quitarle la autenficacion que la tenia puesta, o sea, el nombre de usuario y la contraseña que al copiarlo de otro sitio donde si era necesario no me habia dado cuenta.

Para el sabio: a mi me funciona tanto con localhost como con la ip privada de mi pc como con el nombre de mi pc como con 127.0.0.1 que lo he visto por el MDaemon y lo he probado, eso si, sin poner puertos ni nada.

Un saludo.

maestro · #6 (**permalink**) 09/05/2003, 16:56

Una cosa, si mandais correo con ASPEMAIL y como remitente usais una direccion que no sea del sistema, no os dejara.

Debeis configurar eñ SMTP para que acepte RELAY , o bien autentificaros ante ASPEMAIL asi:
Mail.Host = "localhost"
mail.username="loquesea"
mail.password="loquesea"