注意,下面的代码来自:http://blog.csdn.net/cngkqy/archive/2007/09/27/1803301.aspxjavascript将网页表格导出Word<script>
 function AllAreaWord() 
{
  if(document.all("tab").rows.length==0)
  {
   alert("没有内容可导!");
   return;
  }
  try{
   var oWD = new ActiveXObject("Word.Application"); 
  }catch(e)
  {
   alert("无法调用Office对象,请确保您的机器已安装了Office并已将本系统的站点名加入到IE的信任站点列表中!");
   return;
  }
var oDC = oWD.Documents.Add("",0,1); 
var oRange =oDC.Range(0,1); 
var sel = document.body.createTextRange(); 
sel.moveToElementText(tab); //tab 为导出数据所在的表格ID
sel.select(); 
sel.execCommand("Copy"); 
oRange.Paste(); 
oWD.Application.Visible = true; 
}
</script><table id="tab" align="center" width="300" border="1" bordercolor="#2baeff" cellpadding="0" cellspacing="0" bgcolor="lightblue">
  <Tr>
    <Td>1</td>
    <Td>2</td>
    <Td>3</td>
  </tr>
  <Tr>
    <Td>4</td>
    <Td>5</td>
    <Td>6</td>
  </tr>
  <Tr>
    <Td>7</td>
    <Td>8</td>
    <Td>9</td>
  </tr>
</table>
<input type=button name='button_export' title='导出到word'  onclick=AllAreaWord() value=下载到word> 
---------------------------------------------------------------------------------------------------------------------- javascript将网页表格导出Excel 
 <SCRIPT LANGUAGE="javascript"><!--function AutomateExcel(){var elTable = document.getElementById("outtable"); //outtable 为导出数据所在的表格ID;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 = null;}//--></SCRIPT><input type="button" name="out_excel" onClick="AutomateExcel();" value="导出到excel" class="notPrint">
<table border="1" cellpadding="0" cellspacing="0" id=outtable>
  <tr height="28">
    <td width="27" height="86" rowspan="4" bgcolor="#ffffcc">序号</td>
    <td width="111" rowspan="4" bgcolor="#ffffcc"><div align="center">服务网点</div></td>
    <td width="402" colspan="7" bgcolor="#ffffcc"><div align="center">用户满意度</div></td>
  </tr>
  <tr height="19">
    <td width="100" height="39" colspan="3" rowspan="2" bgcolor="#ffffcc"><div align="center">样本数量</div></td>
    <td width="218" colspan="3" rowspan="2" bgcolor="#ffffcc">对该服务网点实施本次活动的整体评价,满分10分(平均分数)</td>
    <td width="84" rowspan="3" bgcolor="#ffffcc"><div align="center">季度平均分</div></td>
  </tr>
  <tr height="20"> </tr>
  <tr height="19">
    <td width="29" height="19" bgcolor="#ffffcc"><div align="center">4月</div></td>
    <td width="29" bgcolor="#ffffcc"><div align="center">5月</div></td>
    <td width="42" bgcolor="#ffffcc"><div align="center">合计</div></td>
    <td width="68" bgcolor="#ffffcc"><div align="center">4月</div></td>
    <td width="68" bgcolor="#ffffcc"><div align="center">5月</div></td>
    <td width="82" bgcolor="#ffffcc"><div align="center">合计</div></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td bgcolor="#ffffcc">&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td bgcolor="#ffffcc">&nbsp;</td>
    <td bgcolor="#ffffcc">&nbsp;</td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td bgcolor="#ffffcc">&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td bgcolor="#ffffcc">&nbsp;</td>
    <td bgcolor="#ffffcc">&nbsp;</td>
  </tr>
</table>

解决方案 »

  1.   

    此回复为自动发出,仅用于显示而已,并无任何其他特殊作用
    楼主【jojozw】截止到2008-06-27 23:05:12的历史汇总数据(不包括此帖):
    发帖数:33                 发帖分:1275               
    结贴数:28                 结贴分:1050               
    未结数:5                  未结分:225                
    结贴率:84.85 %            结分率:82.35 %            
    楼主加油
      

  2.   

    直接将内容header为word输出试试,
    其他的没有办法,
    最准确的办法是调用word VBA,但用VBA做这样一个东西,也不容易
      

  3.   

    以前也写过这种报表程序,是用的vb也写过几个java的。用js实现不但不保险也很费劲的,
    js调试不如java什么的方便。你可以用后台程序来实现的,这样你可以用一个已经绘制好表头的
    word/excel文件做做模板,只需要将数据一行行的写入(可以写一个宏供外部程序调用)
    并另存让用户下载就可以了。简单而高效,我一直这样做