繁體中文当前位置: 首页 > 图文教程 > 网络编程 > 编程10000问 > 如何在ASP里显示进度条？
- 编程10000问
- 如何实现点击数的计算？
- 如何随机显示图片计数器？
- 如何用数据库制作一个多用户版的计数器？
- 如何制作一个防止多次刷新计数的图片计数器？
- 如何做一个计数器并让人家申请使用？
- 统计在线人数是实时的吗？
- 图像图表
- 如何把图片也存到数据库中去？
- 如何使图象随机显示？
- 如何制作K线图？
- 为什么有的留言簿不需要数据库？
- 如何编写一个最简单的聊天程序？
- 如何判断发言是否为空？
- 如何判断用户是否非正常离开聊天室？
- 如何用变量实现群聊和悄悄话？
- 如何判断电子邮件的地址格式是否正确？
- 如何实现电子邮件的自动发送？
- 如何使用表单发送电子邮件？
- 如何用ASP发送html格式的邮件？
- 如何用ASP发送带附件的邮件？
编程10000问 中的 如何在ASP里显示进度条？
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2010-01-10 浏览: 171 ::
收藏到网摘: n/a
response.buffer=true
' 应用缓存技术.
dim lostnum
' 防止dmax过大而dstep过小.
dim shownum
delayshow(dstep,dmax)
sub delayshow(dstep,dmax)
' dmax表示要处理多少dmax(步)才能完成全过程，dstep表示已处理的占全过程的大致百分比.
dim total
' 显示所有画面.
dim dtemp
' 过渡变量.
total=100
dtemp=dstep
dstep=dstep+lostnum
if (dstep*total)/dmax<1 then
' 当画面连1%都没有时,则不画,同时用变量lostnum存放未画的总数,便于下次调用本过程时继续.
lostnum=lostnum+dtemp
else
for ccc=1 to fix((dstep*total)/dmax)
' 取整数.
Response.Flush
shownum=shownum+fix((dstep*total)/dmax)
lostnum=0
' 显示缓存里的图片，变量shownum用于存放目前已画的图片.
end if
end sub
sub showlost()
for ccc=1 to (100-shownum)
Response.Write ("<img src=""suifengqiwu/images/delay1.jpg"">")
' 如果取余造成不能画完100次,由showlost()将余下未画的显示为已处理.
next
Response.Write "<BR>"
Response.Flush
end sub
评论 (0) All
