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

80酷酷网    80kuku.com

  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()    //让数据提交的同时执行显示进度条的函数

{

       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>



<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" >


<div id=bar1 border="0" width="100%">

  <tr>

    <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>传送:</b></font></td>

  </tr>

  <tr bgcolor="#999999">

    <td>

      <table border="0" width="" cellspacing="1" bgcolor="#0033FF" id=PercentDone>

        <tr>

          <td><font size=1> </font></td>

        </tr>

      </table>

    </td>

  </tr>

  <tr>

    <td>

      <table border="0" width="100%">

        <tr>

          <td><font face="Verdana, Arial, Helvetica, sans-serif" size="1">剩余时间:</font></td>

          <td><font face="Verdana, Arial, Helvetica, sans-serif" size="1">

                 <span id=min></span> 分  

              <span id=secs></span> 秒

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

              <span id=BytesTotal></span> KB 已上传)</font></td>

        </tr>

        <tr>

          <td><font face="Verdana, Arial, Helvetica, sans-serif" size="1">

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

          <td><font face="Verdana, Arial, Helvetica, sans-serif" size="1">

              <span id=BytesPerSecond></span> KB/秒</font></td>

        </tr>

        <tr>

          <td><font face="Verdana, Arial, Helvetica, sans-serif" size="1">信息:</font></td>

          <td><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><span id=Information></span></font></td>

        </tr>

      </table>

    </td>

  </tr>

  <tr></tr>

</table>

</div>

<iframe name="up" Error Resume Next

Set 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 = -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>





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

希望大家有什么意见和建议和我联系:)

junminliumsn.com

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: