envoi de mail

Version imprimable

02/05/2004, 19h52
rolivier

envoi de mail

Bonjour je dois realiser un programme qui envoi des mails automatiquement des qu'une action se passe.

Je suis assez debutant alors h'aimerais que l'on m'explique comment faire pour envoyer des mails sous builder d'une facon assez simple.

Merci de bien vouloir m'aider
02/05/2004, 21h08
Invité

la plus simple est de trouver une librarie, par exemple comme CHilkatMail..
02/05/2004, 22h12
rolivier

re

et omment on utilise cette librairie ????

merci de me donner plus de detail
02/05/2004, 22h35
Invité

déjà tu en cherches une sur le web.
souvent ils donnent des fichiers README ou c'est décrit pas à pas comment l'installer.

si tu sais pas ou chercher, tiens quelques adresses qui te seront peut etre utiles:

http://www.programmersheaven.com/
http://www.torry.net/
http://www.codeproject.com/
http://vclcomponents.com/
04/05/2004, 09h58
rolivier

merci pour ces infos mais je viens de voir qu'on pouvait utiliser la methode sendmail.J'aimerais avoir quelques explications sur cette methode car j'ai regarde l'aide mais j'ai des pb de connexion.

Merci de m'eclairer

Voici mon code

Code:

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
__fastcall TForm1::TForm1(TComponent* Owner): TForm(Owner)
{
if (NMSMTP11->Connected)
 
NMSMTP11->Disconnect();
 
else
{
NMSMTP11->Host="ip";
NMSMTP11->Connect();
}
 
NMSMTP11->PostMessage->ToAddress="toto@yahoo.fr";
 
NMSMTP11->PostMessage->Body="test de mail";
 
NMSMTP11->SendMail();
}
 
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::NMSMTP1Connect(TObject *Sender)
{
{
  Memo5->Clear();
  Memo5->Lines->Add("Connecté");
 
}
 
 
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::NMSMTP1SendStart(TObject *Sender)
{
Memo5->Lines->Add("Envoi de message");        
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::NMSMTP1Failure(TObject *Sender)
{
 Memo5->Lines->Add("Echec de l'expédition du message");        
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::NMSMTP1Success(TObject *Sender)
{
Memo5->Lines->Add("Message expédié");
exit(0);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::NMSMTP1RecipientNotFound(AnsiString Recipient)
{
Memo5->Lines->Add("Destinataire  "+Recipient+" non trouvé");
}
//---------------------------------------------------------------------------

il me sort 2 erreurs quand je rentre l'adresse de destination et le body

[C++ Erreur] mail.cpp(25): E2034 Impossible de convertir 'char *' en 'TStringList *'

Si quelqu'un voit d'ou ca vient et comment remedier merci de me faire signe

Il semble que les attributs Body et ToAddress soit de type TStringList et non char *.

Essaie donc plutôt:
Code:

1 2 3 NMSMTP11->PostMessage->ToAddress->Add("toto@yahoo.fr"); NMSMTP11->PostMessage->Body->Add("test de mail");
Au lieu de :
Code:

1 2 3 NMSMTP11->PostMessage->ToAddress="toto@yahoo.fr"; NMSMTP11->PostMessage->Body="test de mail";