JavaScriptがWebページの内容をWordおよびExcelにエクスポートする方法
1814 ワード
本論文の実例は、JavaScriptがWebページの内容をWordおよびExcelに導出する方法を説明する.皆さんの参考にしてください.具体的な実現方法は以下の通りです.
セルA
セルA
セルA
セルの結合行A
セルB
セルB
セルB
セルB
セルの結合行B
&噫13;
//指定ページエリアの内容は、Excel&{13を導入します.
function AllAree Excel()&莹13;
{啝13
var oXL=new ActiveXObject("Excel.Appplication")、&啱13;
var oWB=oXL.Workbook s.Add();
var oSheet=oWB.Active Sheet;
var sel=document.body.create TextRange()&菗13;
sel.moveToElement Text(PrintA);
sel.select()&獠13;
sel.execCommand("Copy")&
o Sheet.Paste()&唵13;
oXL.Visible=true;
}&{13;
//指定ページエリア「セル」の内容はExcel&唵13を導入します.
function CelAree Excel()&莹13;
{啝13
var oXL=new ActiveXObject("Excel.Appplication")、&啱13;
var oWB=oXL.Workbook s.Add();
var oSheet=oWB.Active Sheet;
var Lenr=PrintA.rows.length;
for(i=0;i<Lenr;i+)&璖13;
{啝13
var Lenc=PrintA.rows(i).cels.length;&菗13;
for(j=0;j<Lenc;j+)&唵13;
{啝13
o Sheet.Cells(i+1,j+1).value=PrintA.rows(i).cels(j).innerText;
}&{13;
}&{13;
oXL.Visible=true;
}&{13;
&噫13;
//指定ページエリアの内容をWord&{13に導入する.
function AllAream Word()&唵13;
{啝13
var oWD=new ActiveXObject(「Word.Appplication」);
var oDC=oWD.Dockments.Add(","0,1);&菗13;
var oRange=oDC.Range(0,1);
var sel=document.body.create TextRange()&菗13;
sel.moveToElement Text(PrintA);
sel.select()&獠13;
sel.execCommand("Copy")&
oRange.Paste()&唵13;
oWD.Apple.Visible=true;
//window.close()&夝13;
}&{13;
本論文で述べたように、皆さんのjavascriptプログラムの設計に役に立ちます.
WEB EXCEL
セルAセルA
セルA
セルA
セルの結合行A
セルB
セルB
セルB
セルB
セルの結合行B
&噫13;
//指定ページエリアの内容は、Excel&{13を導入します.
function AllAree Excel()&莹13;
{啝13
var oXL=new ActiveXObject("Excel.Appplication")、&啱13;
var oWB=oXL.Workbook s.Add();
var oSheet=oWB.Active Sheet;
var sel=document.body.create TextRange()&菗13;
sel.moveToElement Text(PrintA);
sel.select()&獠13;
sel.execCommand("Copy")&
o Sheet.Paste()&唵13;
oXL.Visible=true;
}&{13;
//指定ページエリア「セル」の内容はExcel&唵13を導入します.
function CelAree Excel()&莹13;
{啝13
var oXL=new ActiveXObject("Excel.Appplication")、&啱13;
var oWB=oXL.Workbook s.Add();
var oSheet=oWB.Active Sheet;
var Lenr=PrintA.rows.length;
for(i=0;i<Lenr;i+)&璖13;
{啝13
var Lenc=PrintA.rows(i).cels.length;&菗13;
for(j=0;j<Lenc;j+)&唵13;
{啝13
o Sheet.Cells(i+1,j+1).value=PrintA.rows(i).cels(j).innerText;
}&{13;
}&{13;
oXL.Visible=true;
}&{13;
&噫13;
//指定ページエリアの内容をWord&{13に導入する.
function AllAream Word()&唵13;
{啝13
var oWD=new ActiveXObject(「Word.Appplication」);
var oDC=oWD.Dockments.Add(","0,1);&菗13;
var oRange=oDC.Range(0,1);
var sel=document.body.create TextRange()&菗13;
sel.moveToElement Text(PrintA);
sel.select()&獠13;
sel.execCommand("Copy")&
oRange.Paste()&唵13;
oWD.Apple.Visible=true;
//window.close()&夝13;
}&{13;
本論文で述べたように、皆さんのjavascriptプログラムの設計に役に立ちます.