Discussion :

[kmaniche]

Bonjour,

Je developpe une application de gestion, et le résultat d'une requette est sauver dans un fichier.

A l'aide d'un boutton je cherche à envoyer ce fichier (+ un objet et un texte) à un client que j'ai son adresse mail dans un TEdit (exemple : usflay@yahoo.fr).

Es-ce que quelqu'un pourrai m'aider, comment et quels composants utiliser.

Merci.

@+

[bakaneko]

Voici un bout de code que j'ai fait il y a quelques temps.
Je ne sais plus s'il marche mais il devrait t'aider à trouver ton bonheur.

Code C++ :

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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
 
bool EnvoieMail(TForm* Fiche,InfosMail Infos,TStrings* Body,bool Date)
{
 TIdSMTP* SMTP = new TIdSMTP(Fiche);//composant d'envoi de données
 TIdMessage* Message = new TIdMessage(Fiche);//composant de gestion du message
 
 Message->CharSet = "iso-8859-1";
 
 if (Date)//si insertion de date
 {
  AnsiString DatePost = "Posté le " + Now().DateString() + " à "+ Now().TimeString();//création de la ligne date
  Message->Body->Add(DatePost);//ajout au message
 }
 
 for (int i = 0;i < Body->Count;i++)//parcours des lignes du message
        Message->Body->Add(Body->Strings[i]);//ajout de la ligne
 Message->ContentType = "text/plain";//type de texte
 
 Message->From->Text = Infos.Source;//ajout adresse origine
 
 Message->Recipients->EMailAddresses = Infos.Cible;//ajout adresse cible
 Message->Subject = Infos.Sujet;//ajout sujet
 
 TIdAttachment* Attache = NULL;
 if (Infos.Joint.Length() != 0)//si piece jointe
 {
  Message->ContentType = "multipart/mixed";//type de message
  Attache = new TIdAttachment(Message->MessageParts,Infos.Joint);//ajout de la pièce jointe
 }
 
 SMTP->Host = Infos.SMTP; //adresse de l'hote
 SMTP->Port = 25;//port SMTP
 
 if (Infos.Pass.Length() != 0 && Infos.Login.Length() != 0)//si présence donnée log et pass
 {
  SMTP->UserId = Infos.Login;//ajout login
  SMTP->Password = Infos.Pass;//ajout pass
  SMTP->AuthenticationType = atLogin;//identification
 }
 else
        SMTP->AuthenticationType = atNone;//pas d'identification
 
 if (SMTP->AuthenticationType == atLogin)//si identification
 {
  if (!SMTP->Authenticate())//si identification ratée
  {
   if (Attache != NULL)
        delete Attache;
 
   delete Message;
   delete SMTP;
   return false;//erreur
  }
 }
 SMTP->Connect();//connection
 
 if (SMTP->Connected())//si connection OK
        SMTP->Send(Message);//envoie mail
 else//sinon
 {
  if (Attache != NULL)
        delete Attache;
  delete Message;
  delete SMTP;
  return false;//erreur
 }
 
 if (Attache != NULL)
        delete Attache;
 delete Message;
 delete SMTP;
 
 return true; //sortie OK
}

Nb:

Code C++ :

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

1
2
3
4
5
6
7
8
9
10
11
 
typedef struct
{
 AnsiString Source,//Mail source
            Cible,//Mail cible
            SMTP,//lien SMTP
            Login,//login pour lien SMTP
            Pass,//pass pour lien SMTP
            Sujet,//sujet du mail
            Joint;//chemin de la pièce jointe
}InfosMail;//structure info mail

[Flow_75]

une question concernant la structure que tu passes en parametre, en particulier a la variable Joint et a son commentaire correspondant. Il s'agit bien de la variable pour le fichier joint, rassure moi.....car d'apres le commentaire, il s'agit d'une couleur...........et dans ton code, il s'agit des parametre de la piece jointe.
Merci

[bakaneko]

une question concernant la structure que tu passes en parametre, en particulier a la variable Joint et a son commentaire correspondant. Il s'agit bien de la variable pour le fichier joint, rassure moi.....car d'apres le commentaire, il s'agit d'une couleur...........et dans ton code, il s'agit des parametre de la piece jointe.
Merci

Oups
Erreur de copier/coller dans le commentaire
C'est bien le chemin de la pièce jointe

[pottiez]

Sinon il y a le composant TNMSMTP, qui est facile a utiliser.

[kmaniche]

Bonjour,

j'ai un compte sur yahoo.fr "kusp@yahoo.fr" et cherche à envoyer un mail+un fichier attaché vers l'email "usflay@yahoo.fr"

Malheuresement je ne conais pas l'adresse du host de yahoo

merci de m'aider svp.

@+