Como reutilizar registros de uma consulta ASP

[xanburzum 169]

olha este exemplo criando um CSS automático

 

<%@ LANGUAGE=VBSCRIPT %>
<%Option Explicit%>
<%
Dim cardtype, light_color, dark_color, cardimage

'lê querystring value
cardtype = request.querystring("cardtype")

'Definir nosso valor de estilo com base na
'Querystring passada
select case cardtype
 case "gold"
   light_color = "gold"
   dark_color = "navy"	
   cardimage = "goldcard.gif"
 case "platinum"
   light_color = "silver"
   dark_color = "green"	
   cardimage = "platinumcard.gif"
 case "standard"
   light_color = "#ddffdd"
   dark_color = "#339933"	
   cardimage = "standardcard.gif"
end select
%>

h2 { FONT-FAMILY: Arial; FONT-STYLE: italic; 
    COLOR: <%= dark_color %> }

li {LIST-STYLE-IMAGE: URL("<%= cardimage %>");} 

table.transactions{BACKGROUND-COLOR:<%= light_color %>;
   COLOR:<%= dark_color %>;
   BORDER: THICK DOUBLE <%= dark_color %>;}

.reverse{BACKGROUND-COLOR:<%= dark_color %>;
   COLOR:<%= light_color %>;}