在IE中调用javascript打开Excel(downmoon原作)

在IE中调用javascript打开Excel(downmoon原作)

关键词: javascript调用excel                                


None.gif <! DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" >
None.gif
< HTML >
None.gif
< HEAD >
None.gif
< META  http-equiv =Content-Type  content ="text/html; charset=utf-8" >
None.gif
< TITLE > Top30销控表 </ TITLE >
None.gif
None.gif
</ HEAD >
None.gif
< BODY >
None.gif
None.gif
< input  name ="shanghai"  type ="button"  class ="but"  id ="shanghai"  onClick ="StartExcel('上海')"  value ="上海店" >
None.gif
ExpandedBlockStart.gifContractedBlock.gif
< SCRIPT  LANGUAGE ="Javascript" > ...
InBlock.gif
var idTmr = "";
InBlock.gif
InBlock.gif
function StartExcel(strFileName)
ExpandedSubBlockStart.gifContractedSubBlock.gif
...{
InBlock.gif
var oExcel;
InBlock.gif
var oWorkbook;
InBlock.gif
var strAllName;
InBlock.gifoExcel 
= new ActiveXObject("Excel.Application");
InBlock.gif
//if(strFileName=null || strFileName="")
InBlock.gif//
{return;
InBlock.gif//
}
InBlock.gif
strAllName="\\ep-hgh\Top30销控表\TOP30招商续约销控表-"+strFileName+".xls";
InBlock.gifoExcel.Workbooks.Open(strAllName);
InBlock.gif
//oExcel.Workbooks.Open("file://ep-hgh/Top30销控表/TOP30招商续约销控表-上海.xls");
InBlock.gif
oExcel.DisplayAlerts = false;
InBlock.gifoExcel.Visible 
= true;
InBlock.gif
//oExcel.Quit();
InBlock.gif//
oExcel = null;
InBlock.gif//
防EExcel死进程的关键!!必须!!!downmoon严重声明
InBlock.gif
idTmr = window.setInterval("Cleanup();",1000);
ExpandedSubBlockEnd.gif}

InBlock.gif
ExpandedSubBlockStart.gifContractedSubBlock.gif
function Cleanup() ...{
InBlock.gifwindow.clearInterval(idTmr);
InBlock.gifCollectGarbage();
ExpandedSubBlockEnd.gif}

ExpandedBlockEnd.gif
None.gif
</ SCRIPT >
None.gif
None.gif
None.gif
</ BODY >
None.gif
</ HTML >

转载于:https://www.cnblogs.com/downmoon/archive/2007/12/29/1019661.html

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值