<% Response.Expires = 0 Response.Expiresabsolute = Now() - 1 Response.AddHeader "pragma","no-cache" Response.AddHeader "cache-control","private" Response.CacheControl = "no-cache" %> 网速测试-51windows.Net

网速测试

正在测试,请稍候...

<% defaultfs = 200 '数据默认大小(K) minfs = 100 '数据最小值 maxfs = 500 '数据最高值 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 for a=1 to fs%><%next%>