Discussion :

[janjannaj]

j'aimerais utilisé une base de donnée (pour les infos sur les personnes) afin de faire du publipostage avec Word. L'idée est d'ouvrir un document (modèle) puis d'effectuer le publipostage avec les données
J'arrive à ouvrir le document comme ce-ci :

Code :

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

1
2
3
4
5
6
7
8
9
SaveChanges := wdDoNotSaveChanges;
// Contient les champs de publipostage
DotFilename :='.\test.dot';
// Affiche le document
WordApplication1.Visible := true;
// On ouvre le Modéle de document concerné par le publipostage
DocWord:= WordApplication1.Documents.Open(DotFileName, EmptyParam,
              EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
              EmptyParam, EmptyParam, EmptyParam);

Puis j'essaie d'adapter le code trouver sur ce ici http://delphi.developpez.com/faq/?pa...ddocmailingexe afin d'utiliser ma table avec un composant TQuery mais je n'y arrive pas

Merci pour votre aide

[JustMe]

Word utilise des fichiers existants (physiquement), dans le tutoriel la source de données pour le publipostage est un fichier texte (data.txt) donc si tu veux l'utiliser tel qu'il est tu doit exporter le résultat de ton Query vers un fichier texte.

[janjannaj]

Un peu plus bas sur la même page, il y a une explication sur comment récupérer les infos d'une table. Mais je crois que la base est une base acces et moi j'ai une base MySQL (avec EasyPHP). De plus j'ai déjà le composant TQuery donc je ne pense pas avoir besoin de récupérer l'alias

PS : voici le lien qui place directement au bon endroit de la page http://delphi.developpez.com/faq/?pa...ordmailingsgbd

[JustMe]

Non la source de données est une base paradox et elle utilise fichier physique qui est customer.db l'exemple récupère le chemin de l'alias pour pouvoir accéder en ODBC à ce fichier.
Ton TQuery est une vue de ta base de données présente seulement dans ton programme.
Si tu peut accéder à ta table sur ta Base MySQL en ODBC tu recopie la chaine de connexion ODBC en se basant sur l'exemple de la Faq ici :

Code :

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

1
2
   // Format ODBC, DSN en langue Française.
    Connection := MaChaineDeConnection;

et ta requete SQL de ton Query ici :

Code :

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

1
2
3
     // Récupére tout les champs
    SQL := MaRequeteSQL;
    SQL1 := EmptyParam;

Tu pourra reprendre l'exemple dans son integrité(ou presque).

[janjannaj]

J'ai changer ces 2 paramètre mais quand j'essaie le DocWord.MailMerge.OpenDataSource()
je met le nom de la table et forcément il me dit qu'il ne trouve pas le fichier.
Mais je n'ai pas de fichier à lui donner car j'ai une base MySQL gérée avec EasyPHP

[JustMe]

Je ne sais pas si tu as bien suivis les étape mais est ce que ta chaine de connexion ressemble à ça :

Code :

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

1
2
// Format ODBC, DSN en langue Française.
Connection := 'Driver={MySQL ODBC 5.1 Driver};Server=localhost;Database=myDataBase; User=myUsername;Password=myPassword;Option=3';

En bref tu dois te connecter à ta base en ODBC le Driver ODBC de MySQL doit être installé.