Discussion :

[vince2005]

Bonjour,

De manière simple, je souhaiterai connaitre le code pour envoyer un mail. En sachant que l'adresse SMTP de mon entreprise est : "smtp.mail.TOTO.com"

Et mon adresse email : pascal.lafont@toto.com.
et celle de mon destinataire : admin@yahoo.fr

Merci pour votre aide.
Avec le code que j'ai pu trouvé dans les differentes faq, l'exécution ne fonctionne pas.

Bonne journée[/code]

[djibril]

montre nous ton code et pourquoi ça marche pas, quel est ton message d'erreur?

[Invité]

Une possibilité parmi tant d'autres :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
use strict;
use warnings;
use Net::SMTP;
 
my $sender = 'titi@toto.com';
my @to = ('tata@toto.com');
 
my $smtp = Net::SMTP->new('smtp.mail.toto.com');
$smtp->mail($sender);
$smtp->to(@to);
$smtp->data();
$smtp->datasend("To: Destinataires\n");
$smtp->datasend("Subject: Objet du mail\n");
$smtp->datasend("Première ligne de texte à envoyer.\n");
$smtp->datasend("Deuxième ligne de texte à envoyer.\n");
$smtp->dataend();
$smtp->quit;

[vince2005]

Rebonjour,

J'ai testé le code ci-dessus et lorsque je l'execute, je n'ai pas de messages d'erreur, par contre je ne recois rien dans ma boite au lettre.

Quel est le paramétrage à faire au niveau pc ??


Merci d'avance

[Invité]

Au niveau du PC, en théorie aucun. Par contre, peut-être faut-il en faire côté passerelle SMTP. Voir l'admin messagerie pour ça.

[Yux]

Le serveur smtp de ton entreprise n'est probablement configuré que pour envoyer les mails issus de clients disposant d'adresses IP spécifiques, typiquement le réseau local de l'entreprise. A moins que tu ne projettes d'envoyer tes mails à partir d'une adresse fixe, il y a peu de chance que ton admin messagerie n'accepte d'autoriser le smtp à relayer tes mails. Le plus simple dans ton cas est d'utiliser un smtp qui acceptera de relayer tes mails (celui de ton FAI par exemple), quitte à spécifier un expéditeur particulier --> au hasard, pascal.lafont@toto.com