怎么一创建ActiveXObject就出错阿？

llldreamnew 2003-08-22 03:42:47

在我自己的机器上没有出错，但是在其他一些机器上javascript中一执行var oXL = new ActiveXObject("Excel.Application")就出错是什么原因阿？请各位大侠帮帮忙啊~！

...全文

86 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

llldreamnew 2003-08-22

打赏
举报

谢谢，我已经找到原因了，是浏览器安全级别的问题~~~~！^_^

whywzf 2003-08-22

打赏
举报

<html>
<head>
<title>Build Document by Script</TITLE>
</HEAD>
<SCRIPT LANGUAGE="JavaScript">

function AutomateExcel() {
// Start Excel and get Application object.
var savePath=document.form.T1.value;
var oXL = new ActiveXObject("Excel.Application");
var oWB = new ActiveXObject("Excel.Sheet");
var oSheet = oWB.ActiveSheet;
var table = document.all.myData;
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;
oWB.SaveAs (savePath);
// oSheet.PrintOut();

//oSheet.Application.Quit();
//oWB.Application.Quit();
oXL.Application.Quit();

}

</SCRIPT>

<BODY>

<Table name="myData" id="myData" border=1 align=center>
<Tr align=center>
<Td>产品名称</Td>
<Td>产品描述</Td>
<Td>产品单价</Td>
<Td>产品等级</Td>
</Tr>
<Tr align=center>
<Td>产品一</Td>
<Td>This is a test</Td>
<Td>300.50</Td>
<Td>一级</Td>
</Tr>
<Tr align=center>
<Td>产品二</Td>
<Td>This is a test</Td>
<Td>300.50</Td>
<Td>一级</Td>
</Tr>
<Tr align=center>
<Td>产品三</Td>
<Td>This is a test</Td>
<Td>300.50</Td>
<Td>一级</Td>
</Tr>
</Table>
<p align=center><input type=button onclick="AutomateExcel() " value="调用" name="button"></p>
<form name="form" method="POST" action="--WEBBOT-SELF--">

<p align="center"><input type="text" name="T1" size="20" value=""></p>
</form>
</BODY>

</HTML>

试试我这个报不?

llldreamnew 2003-08-22