Asp：改进文件上传的进度条，"实时"反映上传情况

热点排行

改进文件上传的进度条，"实时"反映上传情况

类别：Asp 点击：0 评论：0 推荐：

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>

<!--

theUniqueID = (new Date()).getTime() % 1000000000;

function s() //让数据提交的同时执行显示进度条的函数

{

bar(); //开始执行反映上传情况的函数

document.myform.action = "progressupload.asp?ID=" + theUniqueID; //处理上传数据的程序

document.myform.target="up" //将提交的数据放在一个名字是up隐藏的iframe里面处理，这样提交的页面就不会跳转到处理数据的页

document.myform.submit(); //提交表单

}

function bar()

{

bar1.style.display=''; //让显示上传进度显示的层的可见

var timeoutid=null; //这个变量是作定时器的ID

var oXMLDoc = new ActiveXObject('MSXML'); //创建'MSXML'对象

sURL = "progressbar.asp?ID=" + theUniqueID + "&temp="+Math.random(); //获取上传状态数据的地址

oXMLDoc.url = sURL; //load数据

var oRoot=oXMLDoc.root; //获取返回xml数据的根节点

if(oRoot.children != null)

{

if (oRoot.children.item(0).text-100==0) //文件上传结束就取消定时器

clearTimeout(timeoutid)

PercentDone.style.width=oRoot.children.item(0).text+"%"; //设置进度条的百分比例

//根据返回的数据在客户端显示

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

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

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

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

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

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

}

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

timeoutid = setTimeout("bar()",50) //这里设定时间间隔是0.05秒，你也可以根据你的情况修改获取数据时间间隔

}

//-->

</script>

<tr>

</tr>

<td>

<tr>

</tr>

</table>

</td>

</tr>

<tr>

<td>

<tr>

<span id=min></span> 分

<span id=secs></span> 秒

(<span id=BytesDone></span> KB of

</tr>

<tr>

传送速度:</font></td>

</tr>

<tr>

</tr>

</table>

</td>

</tr>

</table>

</div>

</form>

</body>

</html>

progressbar.asp（返回上传状况数据的文件）

<%@EnableSessionState=False%>

On Error Resume Next

Set theProgress = Server.CreateObject("ABCUpload4.XProgress") '创建上传组件对象

theProgress.ID = Request.QueryString("ID")

'将返回数据以xml格式输出

<?xml version="1.0" encoding="gb2312" ?>

<plan>

</plan>

progressupload.asp（处理上传文件）

<%@EnableSessionState=False%>

Response.Expires = -10000

Server.ScriptTimeOut = 300

Set theForm = Server.CreateObject("ABCUpload4.XForm")

theForm.Overwrite = True

theForm.MaxUploadSize = 8000000

theForm.ID = Request.QueryString("ID")

Set theField = theForm("filefield1")(1)

If theField.FileExists Then

theField.Save theField.FileName

End If

<html>

<body>

传送结束

</body>

</html>

对于其他组件上传，原理也就差不多了，只是方法不一样罢了。

希望大家有什么意见和建议和我联系：）

[email protected]

QQ(9619774)

http://www.dotey.net (建设中)

本文地址：http://com.8s8s.com/it/it9239.htm