<% Dim boxname Dim domainname boxname = Session("BOX") domainname = Session("DOMAIN") Select Case domainname Case "FLORIDADEP" Response.Write ("") Response.Write ("") Case "EXOSPHERE" Response.Write ("") Response.Write ("") End Select %>