以下是代码片段:<%Response.Expires = 0Response.Expiresabsolute = Now() - 1Response.AddHeader "pragma","no-cache"Response.AddHeader "cache-control","private"Response.CacheControl = "no-cache"%>网速测试-51windows.Net网速测试正在测试,请稍候... <%defaultfs = 200 "数据默认大小(K)minfs = 100 "数据Z小值maxfs = 500 "数据Z高值fs = Request("s")if len(fs) = 0 or isnumeric(fs) = false then fs = defaultfsif int(fs) > maxfs then fs = maxfsif int(fs) < minfs then fs = minfs//webjx.comfor a=1 to fs%><%next%> 本文来自:赛酷网(www.syku.net) 原文链接: http://www.syku.net/web/program/asp/200711/10689.shtml