function doPrint(servlet, form) {

var oWord = new ActiveXObject("Word.Application");

var oDoc = oWord.Documents.Add("",0,1);

var strFields = form.elements["gFields"].value;

var fields = strFields.split(",");

oWord.Selection.TypeParagraph();

oWord.Selection.Style = oDoc.Styles("正文");

var wdPageBreak = 7;

oWord.Selection.InsertBreak(wdPageBreak); //生成下一页，用于产生正文部分。当前页用于生成目录

for(var i=0;i<fields.length;i++){

form.elements["gFields"].value = fields[i];

var oRange = oWord.Selection.Range;

pastObj(servlet,form,oWord);

}

oWord.Selection.TypeBackspace(); //去掉最后一页

oWord.Selection.HomeKey(6); //返回首页的第一行

oWord.Selection.Font.Bold = 9999998; //加粗

oWord.Selection.Font.Size = 16; //设置字体大小（3号）

oWord.Selection.TypeText("目录");

oWord.Selection.ParagraphFormat.Alignment = 1; //居中

oWord.Selection.TypeParagraph(); //换行

oWord.Selection.Style = oDoc.Styles("正文"); //样式设为正文

oWord.Application.WindowState = 2;

oWord.Application.WindowState = 0;

//生成目录

oWord.ActiveDocument.TablesOfContents.add(oWord.Selection.Range,true,1,3,false,"",true,true,"",true,true,true);

oWord.ActiveDocument.TablesOfContents(1).TabLeader = 1

oWord.ActiveDocument.TablesOfContents.Format = 0;

oWord.Selection.Sections(1).Footers(1).PageNumbers.Add(2,true); //在页脚出生成页码

oWord.Application.Visible = true;

//退出word

//oWord.Quit();

oWord = null;

}

function pastObj(servlet, form,oWord){

var ajax = new AJAXInteraction(servlet, function(requestText) {

if (requestText == "FAILED") {

return;

}

else {

var oDoc = oWord.ActiveDocument;

var sele = oWord.Selection;

sele.Style = oDoc.Styles("标题 1"); //设置样式为标题1

var tempObj = document.getElementById("content");

tempObj.innerHTML = requestText;

var title = document.getElementById("title_"+form.elements["gFields"].value).value;

oWord.Selection.TypeText(title); //取得单位名称，并设为标题

sele.TypeParagraph(); //换行

sele.Style = oDoc.Styles("正文"); //设置样式为正文

var arrs = requestText.split("^^^");

for(var i=0;i<arrs.length;i++){

var obj = document.getElementById("content");

obj.innerHTML = arrs[i];

var sel = document.body.createTextRange();

sel.moveToElementText(obj);

sel.select();

sel.execCommand("Copy");

sele.paste();

var wdPageBreak = 7;

sele.InsertBreak(wdPageBreak); //生成下一页

}

//sele.TypeParagraph();

//sele.TypeText("测试1");

//sele.Style = oDoc.Styles("正文");

}

});

ajax.doPost(getRequestBody(form));

}

[@more@]

ITPub博客

导出到word，并产生目录

最新文章