欢迎光临
我们一直在努力

ASPUpload上传的实现代码(测试通过)3-ASP教程,组件开发

建站超值云服务器,限时71元/月

bar.asp

<%@enablesessionstate=false%>

<%

response.expires = -1

pid = request("pid")

timeo = request("to")

set uploadprogress = server.createobject("persits.uploadprogress")

format = "<br><center><b>正在上传,请耐心等待…</b></center><br>%t%t%b3%t 速度:(%s/秒) 估计剩余时间:%r %r%u / %v(%p)%l%t"

bar_content = uploadprogress.formatprogress(pid, timeo, "#00007f", format)

if "" = bar_content then

%>

<html>

<head>

<title>upload finished</title>

<script language="javascript">

function closeme()

{

window.parent.close();

return true;

}

</script>

</head>

<body onload="closeme()" bgcolor="menu">

</body>

</html>

<%

else not finished yet

%>

<html>

<head>

<meta http-equiv="refresh" content="1;url=<%

response.write request.servervariables("url")

response.write "?to=" & timeo & "&pid=" & pid %>">

<title>正在上传文件…</title>

<style type="text/css">

body,td {font-family:tahoma; font-size: 8pt }

td.spread {font-size: 6pt; line-height:6pt }

td.brick {font-size:6pt; height:12px}

</style>

</head>

<body bgcolor="menu" topmargin=0>

<% = bar_content %>

</body>

</html>

<% end if %>

赞(0)
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com 特别注意:本站所有转载文章言论不代表本站观点! 本站所提供的图片等素材,版权归原作者所有,如需使用,请与原作者联系。未经允许不得转载:IDC资讯中心 » ASPUpload上传的实现代码(测试通过)3-ASP教程,组件开发
分享到: 更多 (0)