对不起，没分了。回头一定给补上！(0分)

我在执行下面的代码时候，编译器报错了（Method 'Headers' not supported by atuomation object）：
WordApp := CreateOleObject('Word.Application') ;//创建Word线程
WordDoc := WordApp.Documents.Open('c:/1.doc');
WordApp.Selection.Headers('wdHeaderFooterPrimary').Range.Text:='页眉';
在进行其他操作的时候也会碰到同样的问题，请问如何解决？

WordApp.ActiveDocument.Sections.Item(1).Headers.Item(wdHeaderFooterPrimary).Range.Text:='页眉';

不行啊，报了“未知页面”的错了！