俺建议调用别人的测试页 嘿嘿 <!--#include file="地址"-->

这是一个官方网站 采取这样的措施可能不好
我查了一些资料，使用了 这种方法：
<%
'清除页面缓冲
Response.Expires=-1
Response.CacheControl="no-cache"
%>
<script language=vbscript>
Dim st
window.status="下载数据中..."
st=timer
</script>
<img src="seelogo.jpg" onload="showspeed()">
<script language=vbscript>
Dim et
Dim speed
Const fs=103
function showspeed()
et=timer
speed=fs/(et-st)
window.status="你访问本站的速度为:"&speed &"(KB/s)"
end function
</script>
但是老感觉速度显示不正常，特别是刷新以后。
测试地址：http://see.xidian.edu.cn/paper/speed/
http://see.2y.net/paper/speed/(电信镜像)