利用Word打印报表

（1）将显示订单信息的表格的id设置为order，因为要打印该表格中的数据。关键代码如下：

<table id="order" width="100%" height="48" border="1" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF" bordercolordark="#CCCCCC" bordercolorlight="#FFFFFF">

（2）编写自定义JavaScript函数outDoc()，用于将Web页面中的订单信息导出到Word中，并进行自动打印，代码如下：

<script language="javascript">

function outDoc(){

var table=document.all.order;

row=table.rows.length;

column=table.rows(1).cells.length;

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

wdapp.visible=true;

wddoc=wdapp.Documents.Add(); //添加新的文档

thearray=new Array();

//将页面中表格的内容存放在数组中

for(i=0;i<row;i++){

thearray[i]=new Array();

for(j=0;j<column;j++){

thearray[i][j]=table.rows(i).cells(j).innerHTML;

}

}

var range = wddoc.Range(0,0);

range.Text="订单信息列表"+"\n";

wdapp.Application.Activedocument.Paragraphs.Add(range);

wdapp.Application.Activedocument.Paragraphs.Add();

rngcurrent=wdapp.Application.Activedocument.Paragraphs(3).Range;

var objTable=wddoc.Tables.Add(rngcurrent,row,column) //插入表格

for(i=0;i<row;i++){

for(j=0;j<column;j++){

objTable.Cell(i+1,j+1).Range.Text = thearray[i][j].replace(" ","");

}

}

wdapp.Application.ActiveDocument.SaveAs("orderInfo.doc",0,false,"",true,"",false,false,false,false,false); //保存到Word的默认文档保存路径中

wdapp.Application.Printout(); //自动打印

wdapp=null;

}

</script>