asp 中导入Excel文件的问题，
<SCRIPT LANGUAGE="javascript">
<!--
function AutomateExcel()
{
// Start Excel and get Application object.
var oXL = new ActiveXObject('Excel.Application');
//alert('fff');
// Get a new workbook.
var oWB = oXL.Workbooks.Add();
var oSheet = oWB.ActiveSheet;
var table = document.all.data1;
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>
这段代码是从网上找到的，不知为什么说是有错误!请大家帮忙。
问题点数：50、回复次数：10Top
1 楼scoutlin（挖摸追挖摸追挖摸追..）回复于 2005-01-27 19:24:20 得分 48
<%
response.ContentType ="application/vnd.ms-excel"
Response.AddHeader "Content-Disposition", "attachment; filename=1.xls"
%>
后面跟上表格就可以了Top
2 楼qifr（程序人生）回复于 2005-01-27 19:31:29 得分 0
不太明白，这个放在什么位置
我的整个测试页面这样写的
<form name="form1">
<table id="data1">
<tr><td>aaaaaaaaaaaa</td><td>aaaaaaaaaaaa</td></tr>
<tr><td>bbbbbbbbb</td><td>aaaaaaaaaaaa</td></tr>
<tr><td>ccccccc</td><td>aaaaaaaaaaaa</td></tr>
<tr><td>fffffffff</td><td>aaaaaaaaaaaa</td></tr>
</table>
<input type="button" name="out_word1" onclick="javascript:AutomateExcel();" value="导出到excel">
</form>
<SCRIPT LANGUAGE="javascript">
<!--
function AutomateExcel()
{
// Start Excel and get Application object.
var oXL = new ActiveXObject('Excel.Application');
//alert('fff');
// Get a new workbook.
var oWB = oXL.Workbooks.Add();
var oSheet = oWB.ActiveSheet;
var table = document.all.data1;
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>
Top
3 楼hackate（兰花开香入梦境,独思佳人亦飘然!!）回复于 2005-01-27 19:32:34 得分 2
楼上回答了，帮你顶！Top
4 楼scoutlin（挖摸追挖摸追挖摸追..）回复于 2005-01-27 19:33:53 得分 0
<%
response.ContentType ="application/vnd.ms-excel"
Response.AddHeader "Content-Disposition", "attachment; filename=1.xls"
%>
<table id="data1">
<tr><td>aaaaaaaaaaaa</td><td>aaaaaaaaaaaa</td></tr>
<tr><td>bbbbbbbbb</td><td>aaaaaaaaaaaa</td></tr>
<tr><td>ccccccc</td><td>aaaaaaaaaaaa</td></tr>
<tr><td>fffffffff</td><td>aaaaaaaaaaaa</td></tr>
</table>Top
5 楼qifr（程序人生）回复于 2005-01-27 19:33:54 得分 0
var oXL = new ActiveXObject('Excel.Application');
这一句好像就出错了，没有创建成功Top
6 楼qifr（程序人生）回复于 2005-01-27 19:35:50 得分 0
写上了，还是不行，Top
7 楼scoutlin（挖摸追挖摸追挖摸追..）回复于 2005-01-27 19:40:31 得分 0
<input type="button" name="out_word1" onclick="javascript:AutomateExcel();" value="导出到excel">
</form>
<SCRIPT LANGUAGE="javascript">
<!--
function AutomateExcel()
{
// Start Excel and get Application object.
var oXL = new ActiveXObject('Excel.Application');
//alert('fff');
// Get a new workbook.
var oWB = oXL.Workbooks.Add();
var oSheet = oWB.ActiveSheet;
var table = document.all.data1;
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>
以上不要
只写下面这些
<%
response.ContentType ="application/vnd.ms-excel"
Response.AddHeader "Content-Disposition", "attachment; filename=1.xls"
%>
<table id="data1">
<tr><td>aaaaaaaaaaaa</td><td>aaaaaaaaaaaa</td></tr>
<tr><td>bbbbbbbbb</td><td>aaaaaaaaaaaa</td></tr>
<tr><td>ccccccc</td><td>aaaaaaaaaaaa</td></tr>
<tr><td>fffffffff</td><td>aaaaaaaaaaaa</td></tr>
</table>
Top
8 楼qifr（程序人生）回复于 2005-01-27 19:47:45 得分 0
这样是行了， 谢谢！
但我原来那样写应该也是一种导出的方法呀，为什么不行呢，
我在网上查了许多资料，都有那种方法，
还请赐教Top
9 楼scoutlin（挖摸追挖摸追挖摸追..）回复于 2005-01-27 19:57:07 得分 0
Excel.Application
需要安装office
但有时候安装了OFFICE也不能用，我也不太清楚
不涉及到复杂格式和图表
只是表格内的应用
<%
response.ContentType ="application/vnd.ms-excel"
Response.AddHeader "Content-Disposition", "attachment; filename=1.xls"
%>
足够了Top
10 楼qifr（程序人生）回复于 2005-01-27 20:00:30 得分 0
谢谢，我就用这种方法了，先给客户解决了问题再说了。Top
