%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim Trackno %> <% Randomize %> <% Trackno = Int(Rnd*25) + 1 %> <% ' prepare the sql statement %> <% sqlSelect = "SELECT * FROM Tracks WHERE Index = " & trackno %> <% 'create recordset %> <% Set rstTracks = myconn.execute(sqlSelect) %>