<% sname = Request.ServerVariables("SERVER_NAME") sname = ucase(sname) if InStr(sname,"FITNESSWOMEN.COM") <> 0 then response.redirect "subdirectory to go to" end if %>