Untitled Document

<%@LANGUAGE="VBSCRIPT"%> <% Dim Standings Dim Standings_cmd Dim Standings_numRows Set Standings_cmd = Server.CreateObject ("ADODB.Command") Standings_cmd.ActiveConnection = MM_website_STRING Standings_cmd.CommandText = "SELECT * FROM Category" Standings_cmd.Prepared = true Set Standings = Standings_cmd.Execute Standings_numRows = 0 %> Untitled Document

<% Standings.Close() Set Standings = Nothing %>