Discussion :

[ouinih]

Bonjour,

j'utilise le module Net::SMTP pour envoyer un email avec une piece jointe.
dans le code, je lui donne le chemin de mon fichier (D:/rep/fichier.txt) mais quand je recois l'email, dans la zone piece jointe, le nom du fichier jointe deviet Drepfichier.txt
Je souhaiterai savoir comment je peux dans la zone pièce jointe, afficher seulement le nom du fichier et non le chemin complet.

voila une partie du code

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
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
 if ($self->{ATTACHMENTS}) { 
 
                        @filelist=split(";",$self->{ATTACHMENTS}); 
 
                        foreach $file (@filelist) { 
 
                                if (open(FILE,$file) || die "Le fichier ".$file." n'existe pas") { 
 
                                        binmode(FILE); 
 
                                        $file=~s/C:\\//gi; 
                                        $data=undef; 
 
                                        # file in buffer 
                                        while (sysread(FILE,$buffer,1)) { 
                                                $data .= $buffer; 
                                        } 
 
                                        close FILE; 
 
                                        if ($data){ 
                                                $self->{NET_SMTP}->datasend("--separator\n"); 
                                                $self->{NET_SMTP}->datasend("Content-Type: application/octet-stream; name=\"".$file."\"\n");
 
                                                $self->{NET_SMTP}->datasend("Content-Transfer-Encoding: base64\n"); 
                                                $self->{NET_SMTP}->datasend("Content-Disposition: attachment; filename=\"".$file."\"\n\n");
 
                                                $self->{NET_SMTP}->datasend(encode_base64($data)); 
                                        } 
                                } 
                        }

Merci,

[Jedai]

A priori il faut que tu changes la valeur du champ "filename". Y a-t-il une raison particulière pour laquelle tu t'obliges à utiliser Net::SMTP plutôt que l'une des alternatives de haut niveau qui peuvent ajouter un attachement en une ligne de code ?

--
Jedaï

[ouinih]

Effectivement, j'ai juste modifié le FileName.

Merci,