打开门户网站时的网速测试问题！

Question

我现在做的系统中，包括了打开门户网站时的网速测试内容，不知道如何实现？
程序要实现的是：输入"http://www.sina.com"等网站，直接后台登录网站，计算出网站完全打开后网页的显示速度（比如30Kb/s),请问各位大侠用delphi或c#如何实现？还有用端口监听得来的数据准确吗？
在线等，成功后立即结贴！

Answer 1

使用TIdHTTP和TIdAntiFreeze控件
uses DateUtils;IdHttp1.AllowCookies := False;
IdAntiFreeze1.IdleTimeOut := 5000;var
  i, Len: integer;
  s: string;
  Speed, Times: Real;
begin
  t1 := Now;
  s := IdHttp1.Get('http://www.sina.com.cn');
  Len := Length(s);
  Memo1.Lines.Add(IntToStr(Len) + ' Bytes');
  t2 := Now;
  i := DateUtils.MilliSecondsBetween(t1, t2);
  Times := i / 1000;
  Memo1.Lines.Add(FloatToStr(Times) + ' Seconds');
  Speed := (Len) / (1024 * Times);
  Memo1.Lines.Add(Format('%.1f KB/s', [Speed]));
end;

Answer 2

谢谢老兄，不过这样并不是真正浏览新浪时的流量吧？得到的只是新浪首页源文件的大小吧？比如有些图片大小，或者flash大小，都得到.有没有得到新浪浏览时的真正流量？

Answer 3

嗯，知道了，谢谢liangqingzhi兄。正确！