富贵资源网 Design By www.hznty.com

复制代码 代码如下:
function ExportToExcel(tableId) //读取表格中每个单元到EXCEL中 
{
    try{      
            var curTbl = document.getElementById(tableId);
            var oXL = new ActiveXObject("Excel.Application");
            //创建AX对象excel 
            var oWB = oXL.Workbooks.Add();
            //获取workbook对象 
            var oSheet = oWB.ActiveSheet;

            var lenRow = curTbl.rows.length;
            //取得表格行数 
            for (i = 0; i < lenRow; i++)
            {
                var lenCol = curTbl.rows(i).cells.length;
                //取得每行的列数 
                for (j = 0; j < lenCol; j++)
                {
                    oSheet.Cells(i + 1, j + 1).value = curTbl.rows(i).cells(j).innerText; 

                }
            }
            oXL.Visible = true;
            //设置excel可见属性 
      }catch(e){
            if((!+'/v1')){ //ie浏览器 
              alert("无法启动Excel,请确保电脑中已经安装了Excel!/n/n如果已经安装了Excel,"+"请调整IE的安全级别。/n/n具体操作:/n/n"+"工具 → Internet选项 → 安全 → 自定义级别 → ActiveX 控件和插件 → 对未标记为可安全执行脚本的ActiveX 控件初始化并执行脚本 → 启用 → 确定");
           }else{
               alert("请使用IE浏览器进行“导入到EXCEL”操作!");  //方便设置安全等级,限制为ie浏览器 
           }
       }

 function ExportToExcel(tableId) //读取表格中每个单元到EXCEL中
 {
     try{    
             var curTbl = document.getElementById(tableId);
             var oXL = new ActiveXObject("Excel.Application");
             //创建AX对象excel
             var oWB = oXL.Workbooks.Add();
             //获取workbook对象
             var oSheet = oWB.ActiveSheet;

             var lenRow = curTbl.rows.length;
             //取得表格行数
             for (i = 0; i < lenRow; i++)
             {
                 var lenCol = curTbl.rows(i).cells.length;
                 //取得每行的列数
                 for (j = 0; j < lenCol; j++)
                 {
                     oSheet.Cells(i + 1, j + 1).value = curTbl.rows(i).cells(j).innerText;

                 }
             }
             oXL.Visible = true;
             //设置excel可见属性
       }catch(e){
             if((!+'/v1')){ //ie浏览器
               alert("无法启动Excel,请确保电脑中已经安装了Excel!/n/n如果已经安装了Excel,"+"请调整IE的安全级别。/n/n具体操作:/n/n"+"工具 → Internet选项 → 安全 → 自定义级别 → ActiveX 控件和插件 → 对未标记为可安全执行脚本的ActiveX 控件初始化并执行脚本 → 启用 → 确定");  www.th7.cn
            }else{
                alert("请使用IE浏览器进行“导入到EXCEL”操作!");  //方便设置安全等级,限制为ie浏览器
            }
        }
 }

富贵资源网 Design By www.hznty.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
富贵资源网 Design By www.hznty.com