Discussion :

[Chayanne47]

Bonjour,

J'utilise word avec mon application Delphi pour envoyer des lettres de confirmation à des clients avec le publipostage.
les informations sur le client sont stockées dans une base de données.

Et donc je voudrai savoir si on peu automatiquement remplir le champs "À..."
à partir de l'adresse mail enregistré en base

j'utilise delphi 7

Merci.

[ShaiLeTroll]

Tu peux utiliser Word par Automation, tu as toutes les méthodes qu'il faut pour invoquer le Publipostage et le remplissage des champs de fusion ...
Après il faut faire attention à la version de Word, les interfaces changent selon la version

[Chayanne47]

Bonjour,

j'ai toujours ce petit probleme, j'ai testé le code suivant mais sans succès.

Code :

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

1
2
3
4
5
6
7
8
   WPadApp.Documents.Open(FichierModele, LectureSeule);
   WPadApp.ActiveDocument.MailMerge.openDataSource(FichierAOuvrir);
   WPadApp.ActiveDocument.MailMerge.Destination := wdSendToNewDocument;
   WPadApp.ActiveDocument.MailMerge.MailAsAttachment := True;
   WPadApp.ActiveDocument.MailMerge.MailSubject := 'Lettre';
   WPadApp.ActiveDocument.MailMerge.MailAddressFieldName := 'xxx@xxx.fr';
   WPadApp.ActiveDocument.MailMerge.SuppressBlankLines := True;
   WPadApp.ActiveDocument.MAilMerge.execute;

je n'arrive toujours pas à avoir l'adresse mail dans le cadre "À...".

je me suis aider de la faq : http://delphi.developpez.com/faq/?pa...ordmailingsgbd

merci d'avance,

[ShaiLeTroll]

il ne faut pas mettre 'xxx@xxx.fr' dans MailAddressFieldName mais le champ de ta base de données qui contient l'adresse du destinataire, si tu as 10000 courriers à envoyer, en général, c'est pour 10000 personnes différentes ... donc la donnée et le destinataire sont tous les deux dans le DataSource

[Chayanne47]

OK, merci

j'ai mis

Code :

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

WPadApp.ActiveDocument.MailMerge.MailAddressFieldName := 'cli_mail';

qui est donc un champ dans mon fichier de fusion.

mais j'ai toujours pas d'adresse mail d'affiché.

sinon ce sont des lettres personnalisé donc il y a toujours qu'un seul destinataire et donc une ligne dans fichier de fusion.

[Just-Soft]

OK, merci

j'ai mis

Code :

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

WPadApp.ActiveDocument.MailMerge.MailAddressFieldName := 'cli_mail';

qui est donc un champ dans mon fichier de fusion.

mais j'ai toujours pas d'adresse mail d'affiché.

sinon ce sont des lettres personnalisé donc il y a toujours qu'un seul destinataire et donc une ligne dans fichier de fusion.

es-tu connecté à la base de données ?