顯示"資料搜尋中"的百分比 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 %>
|