蘭庭論壇

 找回密碼
 立即註冊
搜索
熱搜: 活動 交友 discuz
查看: 4463|回復: 0
打印 上一主題 下一主題

ASP匯出EXCEL語法

[複製鏈接]
跳轉到指定樓層
樓主
發表於 2013-9-18 12:32:08 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
以下是在client端將網頁表格中的資料匯出至excel的示範
<html>
< body>
< table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="table1">
  <tr>
    <td width="25%">學號</td>
    <td width="25%">姓名</td>
    <td width="25%">科目</td>
    <td width="25%">成績</td>
  </tr>
  <tr>
    <td width="25%">0001</td>
    <td width="25%">王小明</td>
    <td width="25%">國語</td>
    <td width="25%">90</td>
  </tr>
  <tr>
    <td width="25%">0002</td>
    <td width="25%">李大名</td>
    <td width="25%">國語</td>
    <td width="25%">80</td>
  </tr>
  <tr>
    <td width="25%">0003</td>
    <td width="25%">趙中明</td>
    <td width="25%">國語</td>
    <td width="25%">70</td>
  </tr>
< /table>
< form name="f1">
  <input type="button" value="匯出至excel" name="B1">
< /form>
< /body>
< /html>
< script language="JavaScript">
function saveToExcel(str) {
   try {
      var xls = new ActiveXObject("Excel.Application");
      xls.Visible = true;
   }
   catch(e) {
      alert("開啟失敗,請確定你的電腦已經安裝excel,且瀏覽器必須允許ActiveX控件執行");
      return;
   }
   var objTable = document.getElementById(str);
   var xlBook = xls.Workbooks.Add;
   var xlsheet = xlBook.Worksheets(1);
   for (var i=0;i<objTable.rows.length;i++)
      for (var j=0;j<objTable.rows.cells.length;j++)
         xlsheet.Cells(i+1,j+1).value = objTable.rows.cells[j].innerHTML;
}
< /script>


或把button改成如下
<input type="button" name="SaveAs" value="轉存excel檔">
然後在header中加上以下的javascript
< SCRIPT LANGUAGE="JavaScript">
< !--
function executeCommand(strFname)
{
var testCommand = document.execCommand("SaveAs", true, strFname);
}
//-->
< /SCRIPT>
回復

使用道具 舉報

您需要登錄後才可以回帖 登錄 | 立即註冊

本版積分規則

Archiver|手機版|小黑屋|蘭庭論壇

GMT+8, 2024-11-27 07:34 , Processed in 0.050260 second(s), 17 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回復 返回頂部 返回列表