<!-- 本文章提供了asp文件上传组件 persits.uploadprogress来实时文件上传功能哦。
<%@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>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<title>upload finished</title>
<script language="网页特效">
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="content-type" content="text/html; charset=gb2312">
<meta http-equiv="refresh" content="1;url=<%=request.servervariables("url") & "?to=" & timeo & "&pid=" & pid%>">
<title>uploading files...</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 %>