我的部分代码如下:<script language="jscript">// 进度显示函数,我在循环中调用的
function Step(nValue)
{
document.all("tdProgress").width = nValue.toString() + "%";
document.all("divText1").innerText = "正在汇总,已完成";
document.all("divText2").innerText = nValue.toString();
document.all("divText3").innerText = "%"; document.all("txtTemp").value = nValue;
}// 我的工作函数
function btnSum_onclick()
{
//
// (主要代码摘抄如下)
// for (i = 0; i < parseInt(document.all("txtDeptNum").value); i ++)
{
id = "dgUnit__ctl" + (parseInt(i) + 2).toString() + "_chkSelect"; if (document.all(id).checked == true)
{
strFileName = strTempDir
+ "\\"
+ "DB_" + document.all("txtCaseID").value
+ "_" + vDeptIDs[i]
+ ".HTM" strURL = "/BudgetEdit/fmGetData.aspx?Name=nt-zzm&Kind=1&CaseID=" + document.all("txtCaseID").value
+ "&Version=" + document.all("txtVersion").value
+ "&DeptID=" + vDeptIDs[i]; // 文件下载
if (! Download(strURL, strFileName)) return false; index = parseInt(index) + 1; // 此处调用
Step((index * 40) / selNum);
}
} // 此处调用
Step(40); index = 0; for (i = 0; i < parseInt(document.all("txtDeptNum").value); i ++)
{
id = "dgUnit__ctl" + (parseInt(i) + 2).toString() + "_chkSelect"; if (document.all(id).checked == true)
{
strFileName = strTempDir
+ "\\"
+ "DB_" + document.all("txtCaseID").value
+ "_" + vDeptIDs[i]
+ ".HTM" var objSheet = new ActiveXObject("OWC.Spreadsheet"); objSheet.DataType = "HTMLData";
objSheet.HTMLURL = strFileName; //
// (数据处理,略)
// objSheet = null;
index = parseInt(index) + 1; // 此处调用
Step((index * 60) / selNum + 40);
}
} // 此处调用
Step(100);}
function Step(nValue)
{
document.all("tdProgress").width = nValue.toString() + "%";
document.all("divText1").innerText = "正在汇总,已完成";
document.all("divText2").innerText = nValue.toString();
document.all("divText3").innerText = "%"; document.all("txtTemp").value = nValue;
}// 我的工作函数
function btnSum_onclick()
{
//
// (主要代码摘抄如下)
// for (i = 0; i < parseInt(document.all("txtDeptNum").value); i ++)
{
id = "dgUnit__ctl" + (parseInt(i) + 2).toString() + "_chkSelect"; if (document.all(id).checked == true)
{
strFileName = strTempDir
+ "\\"
+ "DB_" + document.all("txtCaseID").value
+ "_" + vDeptIDs[i]
+ ".HTM" strURL = "/BudgetEdit/fmGetData.aspx?Name=nt-zzm&Kind=1&CaseID=" + document.all("txtCaseID").value
+ "&Version=" + document.all("txtVersion").value
+ "&DeptID=" + vDeptIDs[i]; // 文件下载
if (! Download(strURL, strFileName)) return false; index = parseInt(index) + 1; // 此处调用
Step((index * 40) / selNum);
}
} // 此处调用
Step(40); index = 0; for (i = 0; i < parseInt(document.all("txtDeptNum").value); i ++)
{
id = "dgUnit__ctl" + (parseInt(i) + 2).toString() + "_chkSelect"; if (document.all(id).checked == true)
{
strFileName = strTempDir
+ "\\"
+ "DB_" + document.all("txtCaseID").value
+ "_" + vDeptIDs[i]
+ ".HTM" var objSheet = new ActiveXObject("OWC.Spreadsheet"); objSheet.DataType = "HTMLData";
objSheet.HTMLURL = strFileName; //
// (数据处理,略)
// objSheet = null;
index = parseInt(index) + 1; // 此处调用
Step((index * 60) / selNum + 40);
}
} // 此处调用
Step(100);}
解决方案 »
- Bitmap save GDI+ 中发生一般性错误
- 关于asp.net做Grid时无法理解的问题【探讨】?
- 求教关于利用SQL语句实现联表查询后分页!!!
- Application["UserNum"] += 1;,这种写法对马?
- NetAdvantage2006 V.1 for CLR2.0 安装失败!
- ##--为何我的网页不会打开新窗口--##
- 我要用ASP。NET把天空的软件全自动下载到我的服务器上。
- 关于RegisterStartupScript
- 如何访问子控件属性&注册时给用户分配默认角色
- 用vs2013新建网站时报错,配置IIS express失败,无法访问IIS元数据库,您没有足够的特权访问计算机上的IIS网站
- asp.net 学习!
- 请教:从微软站点上下载的.NET Framework SDK 是正式版吗,有没有限制?
是由于IE没有机会处理消息,导致进度无法显示,就像我们在VB中如果做长
时间循环都要调用DoEvent,暂时让Window进行消息处理一样.但在IE中又
如何实现呢!请指正!