ASP上传的进度条实时反映上传情况_自动测试脚本语言

ASP上传的进度条实时反映上传情况

发表于：2007-06-30来源：作者：点击数：标签：

asp中使用组件上传时，有点麻烦就是不知道上传进度是多少，虽然有的提供了上传进度条，例如abcupload（下载地址：http://www.websupergoo.com）已经提供了显示当前上传状态的方法，里面就有专门的实例（在安装目录的Examples下面的progressupload.htm），它是提交数据的同时弹出一个反映进度的页面（progressbar.asp），然后通过这个页面自刷新来每隔一点时间获取当时的上传状态，然后把它们显示出来，但是用页面自刷新的方法效率比较低，不不好调节刷新时间间隔（最小间隔为1秒），而且服务器端返回数据量大，所以不能很好的实时反映上传情况。在客户端使用javascript调用MSXMl对象和setTimout方法去定时load一个xml文件可以实现无刷新定时获取服务器端数据，在这里可以让progressbar.asp输出xml格式的数据，然后供客户端load，仅返回必要的几个参数，这样：页面不刷新；传输的数据少，不需要把所有数据全传到客户端，只传输反映状态的数据，如果定时器设置的时间足够小，那么我们就可以"实时"看到上传的状况了。以下就以abcupload4为例来说明怎么来制作实时的文件上传进度条。（注：我们在abcupload自带例子基础上改进。）

progressupload.htm

（上传文件的前台提交，我们让进度条在这个里面显示）
<html><body>
<script language="javascript"><!--
theUniqueID = (new Date()).getTime() % 1000000000;function s() file://让数据提交的同时执行显示进度条的函数{
bar(); file://开始执行反映上传情况的函数
document.myform.action = "progressupload.asp?ID=" + theUniqueID;
file://处理上传数据的程序
document.myform.target="up" file://将提交的数据放在一个名字是up隐藏的iframe里面处理，这样提交的页面就不会跳转到处理数据的页
document.myform.submit(); file://提交表单}
function bar(){
bar1.style.display= ; file://让显示上传进度显示的层的可见
var timeoutid=null; file://这个变量是作定时器的ID
var oXMLDoc = new ActiveXObject( MSXML );
file://创建 MSXML 对象
sURL = "progressbar.asp?ID=" + theUniqueID + "&temp="+Math.random();
file://获取上传状态数据的地址
oXMLDoc.url = sURL;
file://load数据
var oRoot=oXMLDoc.root;
file://获取返回xml数据的根节点
if(oRoot.children != null) {
if (oRoot.children.item(0).text-100==0) file://文件上传结束就取消定时器
clearTimeout(timeoutid)
PercentDone.style.width=oRoot.children.item(0).text+"%"; file://设置进度条的百分比例
file://根据返回的数据在客户端显示

min.innerHTML=oRoot.children.item(1).text; file://显示剩余时间（分钟）

secs.innerHTML=oRoot.children.item(2).text; file://显示剩余时间（秒钟）

BytesDone.innerHTML=oRoot.children.item(3).text; file://已上传数据大小

BytesTotal.innerHTML=oRoot.children.item(4).text; file://总大小

BytesPerSecond.innerHTML=oRoot.children.item(5).text; file://传输速率

Information.innerHTML=oRoot.children.item(6).text; file://上传信息

}

if (oRoot.children.item(0).text-100<0) file://只要文件没有传完，就每隔多少时间获取一次数据

timeoutid = setTimeout("bar()",50)

file://这里设定时间间隔是0.05秒，你也可以根据你的情况修改获取数据时间间隔

}//--></script>nbsp; </tr>
 </table> </td> </tr> <tr><td>
<table border="0" width="100%"><tr> <td>
剩余时间:</td>
<td>
分 秒 
( KB of KB 已上传)</td>
 </tr> <tr>
<td>
 传送速度:</td>
<td>
 KB/秒</td>
</tr> <tr>
<td>信息:</td>
 <td>
</td> </tr> </table> </td> </tr> <tr></tr></table></div><iframe name="up" style="display:none"></iframe></form></body>
</html>progressbar.asp（返回上传状况数据的文件）

<%@EnableSessionState=False%><%
On Error Resume NextSet theProgress = Server.CreateObject("ABCUpload4.XProgress") 创建上传组件对象theProgress.ID = Request.QueryString("ID") 将返回数据以xml格式输出
%><?xml version="1.0" encoding="gb2312" ?><plan> <PercentDone><%=theProgress.PercentDone%></PercentDone>
<min><%=Int(theProgress.SecondsLeft/60)%></min>
 <secs><%=theProgress.SecondsLeft Mod 60%></secs>
 <BytesDone><%=Round(theProgress.BytesDone / 1024, 1)%></BytesDone>

; <BytesTotal><%=Round(theProgress.BytesTotal / 1024, 1)%></BytesTotal> <BytesPerSecond><%=Round(theProgress.BytesPerSecond/1024, 1)%></BytesPerSecond> <Information><%=theProgress.Note%></Information></plan>
progressupload.asp（处理上传文件）<%@EnableSessionState=False%>
<%Response.Expires = -10000Server.ScriptTimeOut = 300
Set theForm = Server.CreateObject("ABCUpload4.XForm")
theForm.Overwrite = TruetheForm.MaxUploadSize = 8000000
theForm.ID = Request.QueryString("ID")Set theField = theForm("filefield1")(1)
If theField.FileExists Then theField.Save theField.FileNameEnd If%><html><body>传送结束</body>
</html>

对于其他组件上传，原理也就差不多了，只是方法不一样罢了
希望大家有什么意见和建议和我联系：）
junminliu@msn.com

<form name="myform" method="post" action="progressupload.asp" enctype="multipart/form-data" target=up>
<input type="file" name="filefield1"> <input type="button" name="dosubmit" value="Upload" onclick="s()"> <div id=bar1 style="display:none">
<table border="0" width="100%"> <tr>
<td>传送:</td> </tr>
<tr bgcolor="#999999"> <td>
<table border="0" width="" cellspacing="1" bgcolor="#0033FF" id=PercentDone>
<tr><td> </td>&

原文转自：http://www.ltesting.net

软件测试 > 测试开发技术 > 软件测试开发语言 > 自动测试脚本语言 >