<rt id="bn8ez"></rt>
<label id="bn8ez"></label>

  • <span id="bn8ez"></span>

    <label id="bn8ez"><meter id="bn8ez"></meter></label>

    溫馨提示:您的每一次轉載,體現了我寫此文的意義!!!煩請您在轉載時注明出處http://www.tkk7.com/sxyx2008/謝謝合作!!!

    雪山飛鵠

    溫馨提示:您的每一次轉載,體現了我寫此文的意義!!!煩請您在轉載時注明出處http://www.tkk7.com/sxyx2008/謝謝合作!!!

    BlogJava 首頁 新隨筆 聯系 聚合 管理
      215 Posts :: 1 Stories :: 674 Comments :: 0 Trackbacks

     核心JavaScript代碼

    <script type="text/javascript">
            
    function bringToExcel(){  
                 
    var pasteText="全部統計表 ";     
                 pasteText
    =pasteText+document.all.ExcelBiao.innerHTML;
                 window.clipboardData.setData (
    "Text", pasteText);   
                 
    var oXL = new ActiveXObject("Excel.Application");     
                 oXL.Visible 
    = true;     
                 
    var oWB = oXL.Workbooks.Add();     
                 
    var oSheet = oWB.ActiveSheet;     
                 oSheet.Paste();     
                 oXL.Visible 
    = true;     
                 oXL.UserControl 
    = true;
            }  
            
    //導出word  
            function OpenWord2(){  
                ExcelSheet 
    = new ActiveXObject('Word.Application');
                ExcelSheet.Application.Visible 
    = true;
                
    var mydoc=ExcelSheet.Documents.Add('',0,0);
                myRange 
    =mydoc.Range(0,1);
                myRange 
    =mydoc.Range(myRange.End-1,myRange.End);//設定起始點    
                var sel=document.body.createTextRange();
                sel.moveToElementText(AoutWord);
    //設置要導出的表格名稱
                sel.select();
                document.execCommand('Copy');
                sel.moveEnd('character');
                myRange.Paste();
                myRange 
    =mydoc.Range(myRange.End-1,myRange.End);
                myRange.InsertAfter(
    "\n");
                ExcelSheet.ActiveWindow.View.TableGridlines 
    = false;
            } 
            
    </script>

    具體看附件
    ExportWordAndExcel

    posted on 2011-12-13 11:51 雪山飛鵠 閱讀(2175) 評論(2)  編輯  收藏 所屬分類: js

    Feedback

    # re: js導出表格數據到word、excel 2016-08-12 09:53 21
    1地方  回復  更多評論
      

    # re: js導出表格數據到word、excel 2016-08-12 09:53 21
    1231  回復  更多評論
      

    主站蜘蛛池模板: 亚洲精品tv久久久久久久久久| 成人黄动漫画免费网站视频| 亚洲日本在线观看视频| 亚洲av无码专区在线观看亚| 成人免费无遮挡无码黄漫视频| 亚洲精品美女网站| 免费看香港一级毛片| 鲁死你资源站亚洲av| 亚洲国产综合精品中文字幕| 亚洲免费在线观看| 亚洲精品无码乱码成人| 免费看又黄又无码的网站| 中文字幕亚洲精品资源网| 五月婷婷在线免费观看| 亚洲色最新高清av网站| 波多野结衣视频在线免费观看| 四虎精品成人免费视频| 亚洲精品无码久久久久去q| 在线a免费观看最新网站| 激情内射亚洲一区二区三区爱妻| 思思99re66在线精品免费观看| 爱情岛论坛亚洲品质自拍视频网站| 亚洲国产成人精品女人久久久| 日本高清不卡aⅴ免费网站| 亚洲综合小说久久另类区| 成人黄软件网18免费下载成人黄18免费视频| 亚洲av永久无码精品网址| 亚洲日韩小电影在线观看| 51精品视频免费国产专区| 亚洲AV无码专区在线观看成人| 中文字幕亚洲一区| 四虎在线视频免费观看视频| 亚洲AV日韩AV永久无码色欲| 亚洲亚洲人成综合网络| 无人在线观看完整免费版视频| 日本特黄特色AAA大片免费| 亚洲an天堂an在线观看| 日本v片免费一区二区三区| 日韩av无码免费播放| 亚洲综合在线一区二区三区| 国产亚洲3p无码一区二区|