首页 > 编程 > JavaScript > 正文

JS将表单导出成EXCEL的实例代码

2019-11-20 21:44:18
字体:
来源:转载
供稿:网友
复制代码 代码如下:

<!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>
  <title> new document </title>
  <meta name="generator" content="editplus" />
  <meta name="author" content="" />
  <meta name="keywords" content="" />
  <meta name="description" content="" />
  <SCRIPT LANGUAGE="javascript"> 
  <!-- 
  function AutomateExcel() 
  { 
  // Start Excel and get Application object. 
  var oXL = new ActiveXObject("Excel.Application"); 
  // Get a new workbook. 
  var oWB = oXL.Workbooks.Add(); 
  var oSheet = oWB.ActiveSheet; 
  var table = document.all.data; 
  var hang = table.rows.length;
  var lie = table.rows(0).cells.length; 
  // Add table headers going cell by cell. 
  for (i=0;i<hang;i++) 
  { 
  for (j=0;j<lie;j++) 
  { 
  //oSheet.Cells(i+1,j+1).Font.Bold = True 
  //oSheet.Cells(i+1,j+1).Font.Size = 50 
  //oSheet.Cells(i+1,j+1).Alignment = 2
  oSheet.Cells(i+1,j+1).value = table.rows(i).cells(j).innerText; 
  } 
  } 
  oXL.Visible = true; 
  oXL.UserControl = true; 
  } 
  //-->
  </SCRIPT>
 </head>

 
 <body>
   <table border="1" width="100%" id="data">
  <tr>
   <td> 姓名</td>
   <td colspan="2">年龄</td>
   <td>出生日期</td>
  </tr>
  <tr>
   <td>6</td>
   <td>25</td>
   <td colspan="2">8</td>
  </tr>
  <tr>
   <td height="22">1</td>
   <td height="22">2</td>
   <td colspan="2" height="22">4</td>
  </tr>
  </table>
<input type="button" name="out_excel" onclick="AutomateExcel();" value="导出到excel" class="notPrint">
 </body>
</html>
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表