这段导出到excel得代码到底错在哪里？请高手指点

点击“导出”按钮后，将表格的内容导出到excel中，代码如下，点击按钮后显示script error，到底错在哪里？
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>北京益智学校</title>
</head>
<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.table27;
//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).value = table.rows(i).cells(j).innerText;
}

}
oXL.Visible = true;
oXL.UserControl = true;
}
//-->
</SCRIPT>
<body topmargin=0 leftmargin=0>
<table name="table27" border="0" width="97%" id="table27" cellspacing="0" cellpadding="0">
<tr>
<td width="30"><p align="center">·</td>
<td>test1</td>
<td width="135">2006-3-20</td>
</tr>
<tr>
<td width="30"><p align="center">·</td>
<td>test2</td>
<td width="135">2006-3-20</td>
</tr>
<tr>
<td width="30"><p align="center">·</td>
<td>test3</td>
<td width="135">2006-3-20</td>
</tr>
</table>
<table>
<tr>
<td>
<input type="button" name="out_excel" onClick="AutomateExcel();" value="导出到excel" class="notPrint">
</td>
</tr>
</table>
</body>
</html>