當前位置:
首頁 >
(转)javascript实现导出Word、Excel
發布時間:2024/4/15
39
豆豆
生活随笔
收集整理的這篇文章主要介紹了
(转)javascript实现导出Word、Excel
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
轉載地址:http://www.zhenhua.org/article.asp?id=568
Javascript 瀏覽器客戶端導出指定區域到Word、Excel <table id = "PrintA" width="100%" border="1" cellspacing="0" cellpadding="0" bgcolor = "#61FF13">
<TR style="text-align : center;">
?<TD>單元格A</TD>
?<TD>單元格A</TD>
?<TD>單元格A</TD>
?<TD>單元格A</TD>
</TR>
<TR>
?<TD colSpan=4 style="text-align : center;"><font color="BLUE" face="Verdana">單元格合并行A</FONT></TD>
</TR>
</TABLE>
<table id = "PrintB" width="100%" border="1" cellspacing="0" cellpadding="0">
<TR style="text-align : center;">
?<TD>單元格B</TD>
?<TD>單元格B</TD>
?<TD>單元格B</TD>
?<TD>單元格B</TD>
</TR>
<TR>
?<TD colSpan=4 style="text-align : center;">單元格合并行B</TD>
</TR>
</TABLE>
<br/>
<input type="button" οnclick="javascript:AllAreaWord();" value="導出頁面指定區域內容到Word">
<input type="button" οnclick="javascript:AllAreaExcel();" value="導出頁面指定區域內容到Excel">
<input type="button" οnclick="javascript:CellAreaExcel();" value="導出表單單元格內容到Excel">
<SCRIPT LANGUAGE="javascript">
?//指定頁面區域內容導入Excel
?function AllAreaExcel()
?{
?var oXL = new ActiveXObject("Excel.Application");
?var oWB = oXL.Workbooks.Add();
?var oSheet = oWB.ActiveSheet;
?var sel=document.body.createTextRange();
?sel.moveToElementText(PrintA);
?sel.select();
?sel.execCommand("Copy");
?oSheet.Paste();
?oXL.Visible = true;
?}
?//指定頁面區域“單元格”內容導入Excel
?function CellAreaExcel()
?{
?var oXL = new ActiveXObject("Excel.Application");
?var oWB = oXL.Workbooks.Add();
?var oSheet = oWB.ActiveSheet;
?var Lenr = PrintA.rows.length;
?for (i=0;i<Lenr;i++)
?{
?var Lenc = PrintA.rows(i).cells.length;
?for (j=0;j<Lenc;j++)
?{
?oSheet.Cells(i+1,j+1).value = PrintA.rows(i).cells(j).innerText;
?}
?}
?oXL.Visible = true;
?}
?//指定頁面區域內容導入Word
?function AllAreaWord()
?{
?var oWD = new ActiveXObject("Word.Application");
?var oDC = oWD.Documents.Add("",0,1);
?var oRange =oDC.Range(0,1);
?var sel = document.body.createTextRange();
?sel.moveToElementText(PrintA);
?sel.select();
?sel.execCommand("Copy");
?oRange.Paste();
?oWD.Application.Visible = true;
?//window.close();
?}
</SCRIPT>
轉載于:https://www.cnblogs.com/jybuding/archive/2009/07/16/1524802.html
總結
以上是生活随笔為你收集整理的(转)javascript实现导出Word、Excel的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: vim插件 (转)
- 下一篇: JavaScript学习笔记(十五)