<% dim serverName serverName = request.ServerVariables("SERVER_NAME") if inStr(1,serverName,"boxesonboard.com",1)>0 then response.Redirect("/boxesonboard") elseif inStr(1,serverName,"tcs-inc.net",1)>0 then response.Redirect("/tcs-inc") elseif inStr(1,serverName,"ubnc.org",1)>0 then response.Redirect("/ubnc") else response.Write("You came to unknown domain. Please choose one of the following:
") response.Write("http://www.boxesonboard.com
") response.Write("http://www.tcs-inc.net
") response.Write("http://www.ubnc.org
") end if %>