% option explicit %> <% Dim con, rs, make, model, modelname, pattrn, yearrange, id, i, lhd, strQuery, selectedidmodel, prefix 'Open Database Connection Set Con = getDBConnection() ' store previous selections ' get the makes dim carMakes carMakes = getCarMakes(con) Con.Close Set Con = Nothing %>