如何生成word文档

[Falconking]

最好能脱离word环境，直接生成文件的。

用宏的话脱离不了word环境，而且速度慢
用有一些类似word的控件，速度慢，而且它是先放在内存中的，生成几千页的话，内存不足。
所以最好能直接生成*.doc文件

[Markliu]

//初始化Com口，
if (::CoInitialize(0) != 0)
{
AfxMessageBox("初始化COM库失败");
// ::CoUninitialize();
// return false;
}

COleVariant vTrue((short)TRUE),
vFalse((short)FALSE),
vOpt((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

//开始一个Microsoft Word实例
_Application oWordApp;
if (!oWordApp.CreateDispatch("Word.Application", NULL))
{
AfxMessageBox("CreateDispatch failed.", MB_OK | MB_SETFOREGROUND);
return;
}

//建立一个新的文档
Documents oDocs;
_Document oDoc;
oDocs = oWordApp.GetDocuments();
oDoc = oDocs.Add(vOpt, vOpt,vOpt,vOpt);

//给文档添加文本
Selection oSel;
oSel = oWordApp.GetSelection();
oSel.TypeText("one");
oSel.TypeParagraph();
oSel.TypeText("two");
oSel.TypeParagraph();
oSel.TypeText("three");

//保存文档
_Document oActiveDoc;
oActiveDoc = oWordApp.GetActiveDocument();
oActiveDoc.SaveAs(COleVariant("c:\\doc1.doc"),
COleVariant((short)0),
vFalse, COleVariant(""), vTrue, COleVariant(""),
vFalse, vFalse, vFalse, vFalse, vFalse);

//退出WORD
oWordApp.Quit(vOpt, vOpt, vOpt);

[demonfox]

同意，直接调用Word的COM接口