页面指定区域导入到Excel和world

js 文件：

var idTmr ;   
 

//整个表格拷贝到EXCEL中 
function method1(tableid) {   
  
    var curTbl = document.getElementById(tableid);   
    var oXL = new ActiveXObject("Excel.Application");   
    //创建AX对象excel   
    var oWB = oXL.Workbooks.Add();   
    //获取workbook对象   
    var xlsheet = oWB.Worksheets(1);  
    //激活当前sheet   
    var sel = document.body.createTextRange();   
    sel.moveToElementText(curTbl);   
    //把表格中的内容移到TextRange中   
    sel.select();   
    //全选TextRange中内容   
    sel.execCommand("Copy");   
    //复制TextRange中内容    
    xlsheet.Paste();   
    //粘贴到活动的EXCEL中         
    oXL.Visible = true;   
    //设置excel可见属性   
 
    try{  
        var fname = oXL.Application.GetSaveAsFilename("save.xls", "Excel Spreadsheets (*.xls), *.xls");  
        if(fname){  
            oWB.SaveAs(fname);  
        }            
          
    }catch(e){  
        print("Nested catch caught " + e);  
    }finally{  
          
        oWB.Close(savechanges=false);  
        oXL.Quit();  
        oXL=null;  
         //结束excel进程，退出完成  
        idTmr = window.setInterval("Cleanup();",1);
    }  
}   
function Cleanup()
{  
    window.clearInterval(idTmr);    
    CollectGarbage();  
}  
 
//导出成为WORLD

 function GetAllAreaWord()
{
  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(select); //tab 为导出数据所在的表格ID
        sel.select();
        sel.execCommand("Copy");
        oRange.Paste();
        oWD.Application.Visible = true;
}

 

页面调用方法：

 <div >
  <input type="button" id="dx" value="导出EXCEL" /><input type="button" id="dw" value="导出word" /></div>
    <div id="select"><%=pagestr %></div>