请问如何把指定的内容写入到事先做好的word模板中，然后新生成一个word文件.
请问如何把指定的内容写入到事先做好的word模板中，然后新生成一个word文件.
事先做好的word模板，里面就是已经画好了表格框架，就比如一个“简历表” 里面的姓名，年龄
，工作经历等这些内容我从数据库里面调出来，然后填写到里面生成一个文件，可以实现吗？有没有实例呢？
谢谢了！
[解决办法]
【转】：老妖创作！
示例是自画表格，也可以直接获取你的表格然后填入数据
//---------------------------------------// 将ListView中的内容导出到Word文档// by ccrun(老妖) 2005.10//---------------------------------------void __fastcall ListView2Word(TListView *lv, String strDocFile){ Variant vWordApp, vTable, vCell; try { vWordApp = Variant::CreateObject("Word.Application"); } catch(...) { MessageBox(0, "启动 Word 出错, 可能是没有安装Word.", "ListView2Doc", MB_OK | MB_ICONERROR); vWordApp = Unassigned; return; } // 隐藏Word界面 vWordApp.OlePropertySet("Visible", false); // 新建一个文档 vWordApp.OlePropertyGet("Documents").OleFunction("Add"); // Variant vSelect = vWordApp.OlePropertyGet("Selection"); // 设置一下字体，大小 vSelect.OlePropertyGet("Font").OlePropertySet("Size", lv->Font->Size); vSelect.OlePropertyGet("Font").OlePropertySet("Name", lv->Font->Name.c_str()); // 要插入表格的行数 int nRowCount(lv->Items->Count); nRowCount = nRowCount < 1? 1: nRowCount; // 要插入表格的列数 int nColCount(lv->Columns->Count); nColCount = nColCount < 1? 1: nColCount; // 在Word文档中插入与ListView行数列数相同的一个表格 vWordApp.OlePropertyGet("ActiveDocument").OlePropertyGet("Tables") .OleProcedure("Add", vSelect.OlePropertyGet("Range"), nRowCount, // 行数 nColCount, // 列数 1, // DefaultTableBehavior:=wdWord9TableBehavior 0); // AutoFitBehavior:=wdAutoFitFixed // 操作这个表格 vTable = vWordApp.OlePropertyGet("ActiveDocument"). OleFunction("Range").OlePropertyGet("Tables").OleFunction("Item", 1); // 设置单元格的宽度 for(int i=0; i<nColCount; i++) { int nColWidth; if(lv->Columns->Count > i) nColWidth = lv->Columns->Items[i]->Width; else nColWidth = 100; // 如果没有设置列，就随便设置个默认值 vTable.OlePropertyGet("Columns").OleFunction("Item", i + 1) .OlePropertySet("PreferredWidthType", 3); // wdPreferredWidthPoints vTable.OlePropertyGet("Columns").OleFunction("Item", i + 1) .OlePropertySet("PreferredWidth", nColWidth * 2); } // 将ListView中的数据写入Word表格 for(int i=0; i<nRowCount; i++) { // 63 63 72 75 6E 2E 63 6F 6D vCell = vTable.OleFunction("Cell", i + 1, 1); vCell.OlePropertySet("Range", lv->Items->Item[i]->Caption.c_str()); for(int j=0; j<lv->Items->Item[i]->SubItems->Count; j++) { if(lv->Columns->Count > j) { vCell = vTable.OleFunction("Cell", i + 1, j + 2); vCell.OlePropertySet("Range", lv->Items->Item[i]->SubItems->Strings[j].c_str()); } } } // 保存Word文档并退出 vWordApp.OlePropertyGet("ActiveDocument") .OleProcedure("SaveAs", strDocFile.c_str()); vWordApp.OlePropertyGet("ActiveDocument").OleProcedure("Close"); Application->ProcessMessages(); vWordApp.OleProcedure("Quit"); Application->ProcessMessages(); vWordApp = Unassigned; // 工作结束 MessageBox(0, "ListView2Doc 转换结束!", "ListView2Doc", MB_OK | MB_ICONINFORMATION);}//---------------------------------------