欧美成人精品手机在线观看_69视频国产_动漫精品第一页_日韩中文字幕网 - 日本欧美一区二区

LOGO OA教程 ERP教程 模切知識交流 PMS教程 CRM教程 開發文檔 其他文檔  
 
網站管理員

JavaScript直接導出Excel,Word(及錯誤處理)
admin
2010年8月18日 1:9 本文熱度 3865

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>WEB頁面導出為EXCEL文檔的方法</title>
</head>
<body>
<BR>
<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>
<TR>
    <TD colSpan=4 style="text-align : center;"><font color="BLUE" face="Verdana">單元格合并行A</FONT></TD>
</TR>
<TR>
    <TD colSpan=4 style="text-align : center;"><font color="BLUE" face="Verdana">單元格合并行A</FONT></TD>
</TR>
<TR>
    <TD colSpan=4 style="text-align : center;"><font color="BLUE" face="Verdana">單元格合并行A</FONT></TD>
</TR>
<TR>
    <TD colSpan=4 style="text-align : center;"><font color="BLUE" face="Verdana">單元格合并行A</FONT></TD>
</TR>
<TR>
    <TD colSpan=4 style="text-align : center;"><font color="BLUE" face="Verdana">單元格合并行A</FONT></TD>
</TR>
</TABLE>
<BR>
<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>
<br>
<br>
<input type="button" onClick="javascript:AllAreaWord();" value="導出頁面指定區域內容到Word">
<input type="button" onClick="javascript:CellAreaExcel();" value="導出頁面指定區域內容到Excel">
<input type="button" onClick="javascript:AllAreaExcel2();" value="導出表單單元格內容到Excel">
<SCRIPT LANGUAGE="javascript">
//----------------------------------------------------------------
//------------ 隨即函數
function genRandNumber(startNum,endNum){
var randomNumber;
randomNumber = Math.round(Math.random()*(endNum-startNum))+startNum;
return randomNumber;
}
//----------------------------------------
var now= new Date();
var year=now.getYear();
var month=now.getMonth()+1;
var day=now.getDate();
var hour=now.getHours();
var minute=now.getMinutes();
var second=now.getSeconds();
var oHtmlNow = year+''+month+''+day+''+hour+''+minute+''+second+''+genRandNumber(999999,111111);
//----------------------------------------------------------------
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
}
function AllAreaExcel2() {
    window.clipboardData.setData("Text", document.all('PrintA').outerHTML);
    try {
        var ExApp = new ActiveXObject("Excel.Application");
   var ExWBk = ExApp.workbooks.add();
   var ExWSh = ExWBk.worksheets(1);
   ExApp.DisplayAlerts = false;
   ExApp.visible = true;
    } catch(e) {
        alert("您的電腦沒有安裝Microsoft Excel軟件！");return false;
    }
    ExWBk.worksheets(1).Paste;
ExApp.Visible = true;
    //設置excel可見屬性


try{
   var fname = ExApp.Application.GetSaveAsFilename(oHtmlNow+".xls", "Excel Spreadsheets (*.xls), *.xls");
   if(fname){
    ExWBk.SaveAs(fname);
   }
}catch(e){
   print("Nested catch caught " + e);
}finally{
  
   ExWBk.Close(savechanges=false);
   ExApp.Quit();
   ExApp=null;
   //結束excel進程，退出完成
   alert('已經成功導入到Excel:'+oHtmlNow+'.xls');
   idTmr = window.setInterval("Cleanup();",1);
}
}
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;
}
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
}
function Cleanup() {
    window.clearInterval(idTmr);
    CollectGarbage();
}
//-----------------------------------------------------------------
</script>
</body>
</html>





在線導出Excel,錯誤信息:Automation服務器不能創建對象解決方案


問題描述：


在部分以IE為內核的瀏覽器下，按鈕“導出為Excel”不起作用，錯誤信息為Automation服務器不能創建對象；





官方(微軟)解釋：


http://support.microsoft.com/kb/828550/zh-cn



解決方案：



  1. 單擊 IE 菜單：工具；
  2. 選擇 Internet選項；
  3. 切換為 安全選項卡；
  4. 單擊自定義級別按鈕；
  5. 更改 對未標記為可安全執行腳本的ActiveX控件初始化并執行 為 提示或者 啟用 ；
  6. 單擊確定，重啟瀏覽器即可。

該文章在 2010/8/18 1:09:28 編輯過
關鍵字查詢
相關文章
正在查詢...
點晴ERP是一款針對中小制造業的專業生產管理軟件系統,系統成熟度和易用性得到了國內大量中小企業的青睞。
點晴PMS碼頭管理系統主要針對港口碼頭集裝箱與散貨日常運作、調度、堆場、車隊、財務費用、相關報表等業務管理，結合碼頭的業務特點，圍繞調度、堆場作業而開發的。集技術的先進性、管理的有效性于一體，是物流碼頭及其他港口類企業的高效ERP管理信息系統。
點晴WMS倉儲管理系統提供了貨物產品管理,銷售管理,采購管理,倉儲管理,倉庫管理,保質期管理,貨位管理,庫位管理,生產管理,WMS管理系統,標簽打印,條形碼,二維碼管理,批號管理軟件。
點晴免費OA是一款軟件和通用服務都免費，不限功能、不限時間、不限用戶的免費OA協同辦公管理系統。
Copyright 2010-2025 ClickSun All Rights Reserved