乔客官方网站技术文栏浏览文章网速测试 - 我们专注于会员互动! 专业的互动应用供应商

快速搜索

最新推荐热门

年份检索

2010年 2篇
2009年 8篇
2007年 55篇
2006年 25篇
2005年 8篇
2004年 140篇
2003年 373篇

技术文栏浏览文章网速测试

网速测试

来源: | 更新日期: 2004-10-13 14:13:10 | 阅读(26748)人次 | 评论(0)条 | 小中大

<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>

所属分类: 应用编程类 - ASP技术

作者: M.Allen

打印收藏推荐投稿报错

顶一下3 踩一下1

已有 0 位对此文章感兴趣的网友发表了看法发表评论快速查看阅读全部