<%@Language=VBScript%> <% SiteNameURL = Request.ServerVariables("SERVER_NAME") %> <% Select Case SiteNameURL Case "www.cal-stewart.com" %><% Case "cal-stewart.com" %><% Case "www.cal-stewart.org" %><% Case "cal-stewart.org" %><% Case "www.ttos-sw.com" %><% Case "ttos-sw.com" %><% Case "www.ttos-sw.org" %><% Case "ttos-sw.org" %><% Case Else %><% End Select %>