发信人: intels(旷野之风)
整理人: i_am_trueman(2003-11-24 08:56:25), 站内信件
|
如何在ASP里显示进度条？
用ASP也可以制作出程序安装时的进度条吗？
当然可以。进度条能够帮助我们及时了解程序安装和运行的进度，不必担心是否死机或运行不正常，现在，我们用显示delay1.jpg图片的多少来表示过程进度，制作一个进度条，代码见下：
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)
'取整数
……
……
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 "
"
Response.Flush
end sub
----
最好的答案：
http://www.waterpub.com.cn/sale/result.asp?id=5301
最好的介绍：
http://www.intels.net/
----
Internet是第一生产力；
网站建设是它的核心；
ASP
就是网站的灵魂。
----
《ASP与相关数据库技术高级指南》
就在：www.waterpub.com.cn/sale/result.asp?id=5301
----
|
|