www.mobrien.com
Downstream Connection Speed Test 
From <%=Request.ServerVariables("SERVER_NAME") %> To Your Computer(<%=Request.ServerVariables("REMOTE_HOST") %>)

This is a very simple JavaScript-based test. Clear your Browser Cache and refresh this page several times. Base your assessment on the averages over a few days of random visits. 
New Test?

Terminology help?

Results:

Kbps

K bytes/sec

 


<% Dim intDisplayDigitsLoopCount On Error Resume Next Response.Write " Current Speed Script users = " For intDisplayDigitsLoopCount = 1 to Len(Application("intActiveUserNumber")) Response.Write (Application("intActiveUserNumber")) Next %>