[publipostage word OLE] : problème étrange

: problème étrange [publipostage word OLE] - Delphi/Pascal - Programmation

Marsh Posté le 20-01-2004 à 17:41:23    

Au moment où je sauve le document(Application.ActiveDocument.SaveAs), le programme passe dans le bloc exception.
J'ai localisé quels étaient les champs qui me posent problème, mais c'est étrange.
Il s'agit de 3 champs, s'insérant dans un tableau dynamique :  
Si je supprime un de ces 3 champs, le programme se déroule correctement.
 
Si je mets les 3 champs en dehors du tableau, le programme passe dans le bloc exception également.
 
Si je mets dans le document word 3 fois le même champ, le programme passe aussi dans le bloc exception.
 
 
Quelle peut être la raison ?
 
 
Voici mon code :
 

Code :
  1. try
  2.             WordApp := CreateOleObject('Word.Application');
  3.             WordApp.Documents.Open(sValeur+'\mondocument.doc');
  4.             WordApp.Application.Visible := False;
  5.             WordApp.Application.ActiveDocument.MailMerge.Destination := wdFormLetters;
  6.             WordApp.Application.ActiveDocument.MailMerge.Execute;
  7.             WordApp.Application.ActiveDocument.SaveAs(sValeur+'\'+sValeurChampDocuLibelle+'.doc');
  8.             SaveChanges := wdDoNotSaveChanges;
  9.             MessageDlg('Le document a été généré sur ' +sValeur+'\'+sValeurChampDocuLibelle+'.doc', mtInformation, [mbOK], 0);
  10.           except
  11.             on E: Exception do begin
  12.               MessageDlg('Un problème relatif à Word a été rencontré.', mtWarning, [mbOK], 0);
  13.             end;
  14.           end;


Message édité par manuhard le 20-01-2004 à 17:50:28
Reply

Marsh Posté le 20-01-2004 à 17:41:23   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed