java 写word 建table,通过复制Table生成word和excel的javascript代码

无标题文档

function AutomateWordAutoPaging(prefixion,Count)

{

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

var oDC = oWD.Documents.Add();

oDC.ShowGrammaticalErrors = false; //屏蔽语法检查

oDC.ShowSpellingErrors = false; //屏蔽拼写检查

var oRange =oDC.Range(0,1);

for (i=0;i

{

var sel = document.body.createTextRange();

var TableName = prefixion+i;

var Table = document.getElementById(TableName)

sel.moveToElementText(Table);

sel.select();

sel.execCommand("Copy");

oWD.Selection.Paste();

oWD.Selection.InsertBreak(); //插入分页符

}

//oWD.ActiveDocument.ActiveWindow.View.Type=3 //设置浏览模式

oWD.Visible = true;

};

function AutomateExcel(prefixion)

{

var elTable = document.getElementById("AutomateExcel");

var oRangeRef = document.body.createTextRange();

oRangeRef.moveToElementText(elTable);

oRangeRef.execCommand("Copy");

try{

var appExcel = new ActiveXObject( "Excel.Application" );

}catch(e)

{

alert("无法调用Office对象，请确保您的机器已安装了Office并已将本系统的站点名加入到IE的信任站点列表中！");

return;

}

appExcel.Visible = true;

appExcel.Workbooks.Add().Worksheets.Item(1).Paste();

appExcel.Workbooks(1).Worksheets.Item(1).Columns("A:A").ColumnWidth = 100;

//appExcel.Workbooks(1).Worksheets.Item(1).Columns("B:B").ColumnWidth = 21;

appExcel = null

};

标题0

内容0

标题1

内容1

标题2

内容2

标题3

内容3

标题4

内容4