<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 雪山飛鵠 閱讀(2176) 評論(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  回復  更多評論
      

    主站蜘蛛池模板: 国产 亚洲 中文在线 字幕| 最新国产AV无码专区亚洲| 久久久久女教师免费一区| 亚洲欧洲校园自拍都市| 亚洲AV永久无码精品一百度影院| 男女交性永久免费视频播放 | 2019中文字幕在线电影免费| 一级特黄录像免费播放肥| 最新亚洲人成无码网www电影| 亚洲美女一区二区三区| 亚洲无线码在线一区观看 | 337P日本欧洲亚洲大胆精品| 国产精品亚洲午夜一区二区三区| 亚洲专区在线视频| 亚洲美女aⅴ久久久91| 亚洲成AV人片在WWW色猫咪| 国产亚洲老熟女视频| 在线精品亚洲一区二区三区| 亚洲男人的天堂在线va拉文| 亚洲中文字幕无码久久综合网| 亚洲日本一区二区三区在线不卡| 国产91精品一区二区麻豆亚洲| 亚洲日本va在线视频观看| 亚洲最新永久在线观看| 337p日本欧洲亚洲大胆色噜噜| 亚洲成人黄色在线| 亚洲AV无码一区二区三区电影| 青青草97国产精品免费观看| 三级毛片在线免费观看| 免费三级毛片电影片| 亚洲国产精品国产自在在线| 亚洲国产精品va在线播放| 久久精品国产亚洲AV蜜臀色欲| 国产精品亚洲va在线观看| 免费国产在线视频| 免费黄色毛片视频| 97亚洲熟妇自偷自拍另类图片| 亚洲 欧洲 视频 伦小说| 永久在线观看免费视频| 成人毛片视频免费网站观看| 亚洲VA成无码人在线观看天堂|