The ASP realizes the test speed with the progress bar. Save the following code as XXX. ASP files, on your server can be run directly.
<%
Response.Expires = 0
Response.ExpiresAbsolute = Now ()-1
Response.AddHeader "Pragma", "No-cache"
Response.AddHeader "Cache-control", "private"
Response.CacheControl = "No-cache"
%><title> Speed Test -51windows.net</title>
<meta http-equiv= "Content-type" content= "text/html; charset=gb2312 ">
<body style= "cursor:wait;" >
<p style= "FONT-SIZE:18PT;" ><B> Speed Test </B></p>
<p id= "T" style= "FONT-SIZE:16PT;" > is testing, please wait ...</p>
<span style= "Width:300;height:16px;background-color:gray;" ><span id= "P" style= "width:0;height:16px;background-color:red;" ></span></span>
<script language= "javascript" >st = new Date (); function $ (p) {document.getElementById ("T"). Innerhtml= "Testing, please wait ... ("+p+"%) ";d Ocument.getelementbyid (" P "). Style.width=p*3} </script>
<%
DEFAULTFS = 200 ' data default size (K)
MINFS = 100 ' data minimum value
MAXFS = 500 ' data Highest value
FS = Request ("s")
If Len (fs) = 0 or IsNumeric (FS) = False Then fs = Defaultfs
if int (fs) > MAXFS then fs = Maxfs
if int (FS) < MINFS then fs = MINFS//ASP98,CN
For A=1 to fs%><!--$%^)!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () ()!@#$%^&* ()!@#$%^&* () !@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () ()!@#$%^&* ()!@#$%^ &* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () %^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () #$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () ()!@#$%^&* ()!@#$%^&* () !@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () ()!@#$%^&* ()!@#$%^ &* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () %^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () #$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () ()!@#$%^&* ()!@#$%^&* () !@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* () ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()!@#$%^&* ()--><script language=javascript>$ (<%=int (A *100/FS) </script><%next%>%>)
<script language=javascript>
Et=new Date ();d s=<%=fs%>;s=math.round (Ds*1000/(et-st) *10)/10;document.body.style.cursor= ' default ';
Nextsize=<%=fs%>;if (s>100) {nextsize=<%=maxfs%>;} else if (s<20) {nextsize=<%=minfs%>;}
document.getElementById ("T"). innerhtml= "Test completed. Your speed: <font color= ' red ' > ' +s+ ' </font> (k/sec) [<a href= '? s= "+nextsize+" &t= "+math.random () +" ' > re-Test </a>] "; </SCRIPT>//ASP98,CN
</body>