ASP实现带进度条的测试网速代码

下载本文示例代码

把下列代码存为.ASP的文件，放在你的服务器上就可以直接运行了。

完整代码如下;

<%
Response.Expires = 0
Response.Expiresabsolute = Now() - 1
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "no-cache"
%>

网速测试

正在测试，请稍候...

<%
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//webjx.com
for a=1 to fs%><%next%>
//webjx.com

把下列代码存为.ASP的文件，放在你的服务器上就可以直接运行了。

完整代码如下;

<%
Response.Expires = 0
Response.Expiresabsolute = Now() - 1
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "no-cache"
%>

网速测试

正在测试，请稍候...

<%
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//webjx.com
for a=1 to fs%><%next%>
//webjx.com

下载本文示例代码


ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码ASP实现带进度条的测试网速代码

阅读(305) | 评论(0) | 转发(0) |

0

上一篇：ASP程序的优化

下一篇：在 ASP.NET 中下载文件的方法