Les Boréalides
<% kit=request.QueryString("kit")
select case kit
case "aurores"
strkit = "( Aurores )"
case "planetaires"
strkit = "( Planétaires )"
case "ciel"
strkit = "( Ciel profond )"
case "activites"
strkit = "( Activités du club )"
case "site"
strkit = "( Site d'observation )"
case else
strkit = "Choisissez votre thème"
end select
%>