我们在访问某些网站,特别是虚拟主机服务商的网站经常会看到一个速度测试的按钮,可以测试用户本地连接到某台服务器的连接速度,这样的程序其实也可以用asp轻松实现,具体如下:
'程序设计:环球万维,专业提供域名注册,虚拟主机服务
'http://www.netInter.cn
'此文章为环球万维原创,若需转载,请注明处出,谢谢。
'以上信息与文章正文是不可分割的一部分,所以如果您要转载本文章,您必须保留以上信息.
Const DataSize=100 '测试数据量,单位K,值越大,测试越精确,但速度越慢,推荐值100K左右
Response.Buffer=false
oneK=String(1024,"A")
TotalData=""
for i=1 to DataSize
TotalData=TotalData & oneK
next
Response.write "
速度测试程序"Response.write "
"Response.write ""
Response.write ""
Response.write ""
%>