Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: COM/DCOM/COM+
Expertise: Beginner
May 2, 1999



Building the Right Environment to Support AI, Machine Learning and Deep Learning

Integration with Word97 Adding Page Number

I am attempting to use OLE between PB5 and Word97. I want to add two fields into the header of the document. I want to add the Page number and the Section Number. I have used Word6 and used the InsertField function to add a "PAGENUM" field. Now, using Word8, I wish to do the same thing functionally. I am attempting to use ActiveDocument.Fields.Add to add the field in Word97, but I am having problems.

The following code is an example of how to add the pagenumber and page count to a Word document in the footer of the document:

lole_OLE.ActiveWindow.View.SeekView = 10
lole_Selection = lole_OLE.Selection
lole_Selection.TypeText( 'This is the footer' )
lole_Selection.ParagraphFormat.Alignment = 1
lole_Selection.ParagraphFormat.Alignment = 2
lole_Selection.Fields.Add( lole_Selection.Range, 33 ) // Page Num
lole_Selection.TypeText( ' - ' )
lole_Selection.Fields.Add( lole_Selection.Range, 26 ) // Num Pages
lole_OLE.ActiveWindow.View.SeekView = 0
To add the section to the current document, you need to use the value of wdFieldSection or 65 in PowerBuilder. So the command would look like:
lole_Selection.Fields.Add( lole_Selection.Range, 65 ) // section number
The lole_OLE is a reference to the Word object and lole_selection is used to speed up the OLE processing by getting a handle to the selection OLE object.
DevX Pro
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date