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

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

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

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

    雪山飛鵠

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

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

     核心JavaScript代碼

    <script type="text/javascript">
            
    function bringToExcel(){  
                 
    var pasteText="全部統(tǒng)計表 ";     
                 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 雪山飛鵠 閱讀(2195) 評論(2)  編輯  收藏 所屬分類: js

    Feedback

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

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

    主站蜘蛛池模板: 国产亚洲成AV人片在线观黄桃| 免费a级毛片无码a∨性按摩| 亚洲综合色一区二区三区小说| 一级白嫩美女毛片免费| 四虎影视永久免费视频观看| 亚洲狠狠婷婷综合久久| 色妞WWW精品免费视频| 亚洲A丁香五香天堂网| 亚洲国产成人精品无码区二本| 无人在线观看免费高清视频| 亚洲一级黄色大片| 无遮免费网站在线入口| 四虎必出精品亚洲高清| 成年18网站免费视频网站 | 91香蕉视频免费| 亚洲人成电影网站| 免费观看成人毛片a片2008| 亚洲色丰满少妇高潮18p| 女人隐私秘视频黄www免费| 国产亚洲精品美女久久久| 嫩草在线视频www免费观看| 久久夜色精品国产噜噜噜亚洲AV| 免费国产污网站在线观看15| 亚洲欧洲日产v特级毛片| 女人张开腿给人桶免费视频| 美女露隐私全部免费直播| 亚洲爽爽一区二区三区| 亚洲人成人网站18禁| 啊v在线免费观看| 成人片黄网站色大片免费观看cn| 亚洲av日韩av无码| www.999精品视频观看免费| 国产精品亚洲二区在线| 亚洲精品无码鲁网中文电影| 精品福利一区二区三区免费视频| 亚洲精品蜜夜内射| 亚洲熟妇无码八AV在线播放| av无码免费一区二区三区| 免费无码午夜福利片69| 亚洲精品私拍国产福利在线| 国产网站免费观看|