ASP.NET 网速测试功能

想做一个类似与QQ空间中的测试功能。不知道怎样做。有没有这样的文章或者另人写好的接口可以使用

解决方案 »

  1.   

    .<p>代码存为speedtest.asp，同目录下放一个大约100K的img.jpg图片，具体大小请改代码中的< font class="HightLight">var fs = 137.57 //img.jpg文件大小(K)</font></p><textarea style="WIDTH: 100%; HEIGHT: 300px" name="code" rows="20" cols="72"><...代码存为speedtest.asp，同目录下放一个大约100K的img.jpg图片，具体大小请改代码中的var fs = 137.57 //img.jpg文件大小(K)<HTML>
    <HEAD>
    <TITLE>网站速度测试</TITLE>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
    </HEAD>
    <BODY>
    <%
    Response.Expires=-1
    Response.ExpiresAbsolute=Now()-1
    Response.cachecontrol="no-cache"
    Dim Imgrandom
    Randomize
    Imgrandom = Int(799999 * Rnd + 200000)
    %>
    <SCRIPT LANGUAGE="JavaScript">
    window.status = "下载数据中..."
    var st = new Date()
    </SCRIPT>
    <img src="img.jpg?id=<%=Imgrandom%>" width=0 height=0 onerror = showerr() onload="showspeed();">
    <SCRIPT LANGUAGE="JavaScript">
    function showspeed()
    {
    var fs = 137.57 //img.jpg文件大小(K)
    var l = 2   //小数点的位数
    var et = new Date()
    alltime = fs*1000/(et - st)
    Lnum = Math.pow(10,l)
    calcspeed = Math.round(alltime*Lnum)/Lnum
    showtxt.innerHTML = ("服务器时间为：<%=now%>，您在本站的下载速度为："+calcspeed+" (K/秒)")
    window.status = "您在本站的下载速度为："+calcspeed+" (K/秒)"
    }
    function showerr()
    {
    showtxt.innerHTML = ("数据下载错误,请刷新重试")
    window.status = "数据下载错误,请刷新重试"
    }
    </SCRIPT>
    <button style="font-size:12px;width:80;height:19px;" onclick=location.href="speedtest.asp?<%=Imgrandom%>">重新测试< /button>
    <span id=showtxt></span>
    </BODY>
    </HTML>
      

  2.   

    ASP的Now()-1 是什么意思，Dim Imgrandom Randomize 又是什么意思 Rnd又是什么意思VB不太会，请讲解一下