Página 3 de 5

NotaPublicado: 2008-01-07 14:56 @664
por explorer
Cabe la posibilidad de que sea un filtrado del servidor de correo. Haz una prueba: envía los correos pero con unos segundos entre ellos, no enviarlos de forma inmediata. Prueba con diez segundos y vete aumentando o reduciendo según falle (si falla).

Para lo que quieres... yo hubiera escogido una solución de "lista de correo".

NotaPublicado: 2008-01-07 15:27 @685
por explorer
Otra cosa que se me ocurre: se pueden poner varios destinatarios, en el campo CCO, pero aquí también puede existir una limitación. Por ejemplo, a nuestros clientes le ponemos un límite de 600 direcciones.

NotaPublicado: 2008-01-07 15:32 @689
por teamvipconnectz
Pues estoy intentando enviar SOLAMENTE UN EMAIL con el script que puse en el último post, no creo que influya en algo el tiempo de espera si solo quiero enviar un email, ¿o si?

De cualquier manera lo probé cambiando los tiempos de esta manera y siguió exactamente con el mismo error:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
MIME::Lite->send('smtp', $host, Timeout=>60, AuthUser=>$user, AuthPass=>$pass);
$msg->send;
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4


¿Cómo es lo de la lista de correo? ¿Sabes en dónde hay información sobre eso? para ver si logro adaptarlo a todo lo que ya tengo.

NotaPublicado: 2008-01-07 16:28 @727
por explorer
No, no puede ser por uno...

Una cosa... la línea que pones (MIME::Lite->send()) deberías ejecutarla UNA sola vez.

Para empezar... Lista de correo.

Suele ser un servicio ofrecido por el hosting, aunque no les gusta mucho...

NotaPublicado: 2008-01-07 16:46 @740
por explorer
Prueba con esto:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
#!/usr/bin/perl
use strict;
use lib('lib');
use CGI::Carp qw(fatalsToBrowser);
use MIME::Lite;

my $usuario  = '[email protected]';
my $password = 'mipass';
my $host     = '00.00.00.000';

my $msg = MIME::Lite->new(
    From    => '[email protected]',
    To      => '[email protected]',
    Subject => 'CGI email',
    Data    => "FUNCIONA",
);

$msg->send('smtp', $host, AuthUser=>$usuario, AuthPass=>$password, Debug => 1);
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4

He hecho un par de cambios... entre ellos, activar el Debug, por si así te da más pistas.

NotaPublicado: 2008-01-07 16:47 @741
por teamvipconnectz
Este es el script, solo tengo una dirección de correo en el destinatario, por eso digo que solo estoy intentando enviar un solo email, para probar que realmente funcione mi script:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
#!/usr/bin/perl

use lib('lib');
use CGI::Carp qw(fatalsToBrowser);
use MIME::Lite;
use Authen::SASL;
use strict;

my($user)='[email protected]';
my($pass)='mipass';
my($host)='00.00.00.000';

my $msg = MIME::Lite->new(
From =>'[email protected]',
To =>'[email protected]',
Subject =>'CGI email',
Data =>"FUNCIONA"
);

MIME::Lite->send('smtp', $host, AuthUser=>$user, AuthPass=>$pass);
$msg->send;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


¿Cómo puedo saber si estoy ejecutando la línea (MIME::Lite->send()) solo una vez? ¿Así como tengo el script se está ejecutando una sola vez?

NotaPublicado: 2008-01-07 17:24 @767
por explorer
Pero ¿has visto mi anterior mensaje? Puedes quitar la línea MIME::Lite->send() y juntarla con la de $msg->send();

NotaPublicado: 2008-01-07 17:26 @768
por teamvipconnectz
ok, no lo había visto, pero ahorita mismo pruebo eso a ver qué tal.

NotaPublicado: 2008-01-07 17:33 @773
por teamvipconnectz
Lo he probado como dices explorer y sale exactamente el mismo error:

Código: Seleccionar todo
Unknown callback: 'authname'. (user|auth|language|pass)


No tengo ni la más mínima idea de qué trata este error porque por más que busco información acerca de él no encuentro nada claro.

NotaPublicado: 2008-01-07 18:33 @814
por explorer
Yo sí que he encontrado algo:
http://search.cpan.org/src/PBOETTCH/Aut ... r/Cyrus.xs

Es un mensaje que sale cuando se ha llamado a una función llamada 'authname' pero solo están disponibles en el módulo las 4 indicadas en el par de paréntesis.

Es decir: le hemos pasado un atributo 'AuthName' a MIME::Lite y éste lo ha intentado pasar a los módulos de autenticación del SMTP. Uno de ellos, entonces, ha intentado ejecutar la función 'authname' para pasarle al protocolo el valor correspondiente, pero la función responde diciendo que esa función no existe. Como mucho, que existe algo llamado auth.

Sigo buscando... en un foro comentaban el uso Email::Send y en otro, el uso de Net::SMTP::TLS, pero creo que no es sobre esto.

Decir, además, que este error está marcado en la lista de errores de Net::SMTP_auth.