下面是代码:
_Application WordApp; if (!WordApp.CreateDispatch(_T("WORD.Application")))
{
::AfxMessageBox("我靠,连office都没装");
return ;
} WordApp.SetVisible(TRUE); Documents docs(WordApp.GetDocuments());
_Document mydoc; COleVariant covTrue((short)TRUE),
covFalse((short)FALSE),
covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
COleVariant a((short)FALSE);
mydoc.AttachDispatch(docs.Open(
COleVariant("C:\\Test.doc",VT_BSTR),
covFalse, // Confirm Conversion.
covFalse, // ReadOnly.
covFalse, // AddToRecentFiles.
covOptional, // PasswordDocument.
covOptional, // PasswordTemplate.
covFalse, // Revert.
covOptional, // WritePasswordDocument.
covOptional, // WritePasswordTemplate.
covOptional, // Format. // Last argument for Word 97
covOptional, // Encoding // New for Word 2000/2002
covTrue, // Visible
covOptional, // OpenConflictDocument
covOptional, // OpenAndRepair
a, // DocumentDirection wdDocumentDirection LeftToRight
covOptional // NoEncodingDialog
) // Close Open parameters
); // Close AttachDispatch(…) Selection abc = mydoc.GetSections();
abc.GetText();可是执行完abc.GetText();后,总是说"Item"不是一种属性```请问应该怎样获得WORD文档的内容?
_Application WordApp; if (!WordApp.CreateDispatch(_T("WORD.Application")))
{
::AfxMessageBox("我靠,连office都没装");
return ;
} WordApp.SetVisible(TRUE); Documents docs(WordApp.GetDocuments());
_Document mydoc; COleVariant covTrue((short)TRUE),
covFalse((short)FALSE),
covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
COleVariant a((short)FALSE);
mydoc.AttachDispatch(docs.Open(
COleVariant("C:\\Test.doc",VT_BSTR),
covFalse, // Confirm Conversion.
covFalse, // ReadOnly.
covFalse, // AddToRecentFiles.
covOptional, // PasswordDocument.
covOptional, // PasswordTemplate.
covFalse, // Revert.
covOptional, // WritePasswordDocument.
covOptional, // WritePasswordTemplate.
covOptional, // Format. // Last argument for Word 97
covOptional, // Encoding // New for Word 2000/2002
covTrue, // Visible
covOptional, // OpenConflictDocument
covOptional, // OpenAndRepair
a, // DocumentDirection wdDocumentDirection LeftToRight
covOptional // NoEncodingDialog
) // Close Open parameters
); // Close AttachDispatch(…) Selection abc = mydoc.GetSections();
abc.GetText();可是执行完abc.GetText();后,总是说"Item"不是一种属性```请问应该怎样获得WORD文档的内容?
MessageBox(abc.GetText());
再打开帮助即可(第一次需要安装),如vbawrd9.chm同理Excel和PPT