rsTopTen = new ActiveXObject("ADODB.Recordset");
ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=C:\\TopTen\\TopTen.mdb";
strSQL = "SELECT TopTenName, TopTenCount FROM TopTen ORDER BY TopTenCount DESC";
rsTopTen.Open(strSQL, ConnectionString, 3,1,1);// Set variable
var nCounter
nCounter = 0;// Loop through the Recordset
while(!rsTopTen.EOF)
{ var nCount, strCount, strFormated // Iterate the counter
nCounter++;

// Load variables from the Recordset
strName = rsTopTen.Fields.Item(0).Value;
nCount = rsTopTen.Fields.Item(1).Value; // Go to the next Record
rsTopTen.MoveNext();};

// Close the Recordset
rsTopTen.Close();