显示"资料搜寻中"的百分比

新客网 XKER.COM 2004-08-26 来源：收藏本文

显示"资料搜寻中"的百分比
2001:9:24

原程式仅将图列出，但如果资料量大时，整个萤幕会被佔满。
此处提供之程式仅将资料读出，並转为百分比及定位显示。
程式如下：
<% Response.Buffer = True
response.write "<body bgcolor=#FFFFFF link=#005f02 vlink=#00b06f background='../bg.gif' bgproperties='fixed'>"
response.write "<span id=""h1"" style=""position:relative;top:0;left:0""></div></span>" 'h1是随意取的 span 名称
'position 是将资料输出位置固定
'开资料库将留言读到 recordset 裡

j = 0
while not rs.eof
j = j + 1
'把留言内容输出
response.write "<script language=""JavaScript"">document.all[""h1""].innerHTML = ""Loading... "
response.write formatpercent(j/rs.RecordCount),0) & """;"
for k = 1 to j
response.write "</script>" & chr(13)
next

response.flush
rs.MoveNext
wend
rs.Close
%>

上一篇：保护ASP脚本源代码下一篇：用ASP实现中英文字体的自动选择

【收藏】【评论】【推荐】【投稿】【打印】【关闭】