3,882
社区成员




Word::WindowPtr ipWindow = NULL;
hr = ipDocument->get_ActiveWindow(&ipWindow); //得到活动窗口
if(FAILED(hr) || ipWindow == NULL)
return;
Word::PanePtr ipPane = NULL;
hr = ipWindow->get_ActivePane(&ipPane); //得到活动窗格
Word::ViewPtr ipView = NULL;
hr = ipPane->get_View(&ipView);//得到窗格中的视口
hr = ipView->put_SeekView(Word::wdSeekCurrentPageHeader);//焦点转到视口中的页眉
Word::SelectionPtr ipSelection = NULL;
hr = ipApplication->get_Selection(&ipSelection);//得到程序的输入焦点(选择区),此时在页眉处
SYSTEMTIME sysTime;
::GetSystemTime(&sysTime);
CString str;
str.Format(_T("%d-%d-%d"),sysTime.wYear,sysTime.wMonth,sysTime.wDay);
hr = ipSelection->TypeText(str.AllocSysString());//在页眉处写入年月日的日期字符串
hr = ipView->put_SeekView(Word::wdSeekMainDocument); //焦点转回到主文档
hr = ipApplication->get_Selection(&ipSelection);); //得到程序的输入焦点(选择区)
if(FAILED(hr) || ipSelection == NULL)
return;
Word::ParagraphsPtr ipParagraphs = NULL;
ipSelection->get_Paragraphs(&ipParagraphs);//得到程序的输入焦点所在的段落