Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Word and PageHeader
Message
De
10/09/2003 06:02:48
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
10/09/2003 05:03:47
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00827763
Message ID:
00827768
Vues:
14
This message has been marked as the solution to the initial question of the thread.
>Maybe is because I don't know how it is called, but I cannot write in the Page Header and Page Footer of a document.
>What Have I to do ?
>
>thanks Alessio
#Define wdHeaderFooterPrimary	1
#Define wdHeaderFooterFirstPage	2
#Define wdHeaderFooterEvenPages	3

oWord = Createobject('Word.Application')
With oWord
  .Documents.Add
  With .ActiveDocument.Sections(1)
    .Headers(wdHeaderFooterPrimary).Range.Text = "This is header"
    .Footers(wdHeaderFooterPrimary).Range.Text = "This is footer"
    .Footers(wdHeaderFooterPrimary).PageNumbers.Add
  Endwith
  .Visible = .T.
  .Activate
Endwith
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform