<% sname = Request.ServerVariables("www.seaclusive.com") sname = ucase(sname) if InStr(sname,"SEACLUSIVE.COM2") <> 0 then response.redirect "directory2" else response.redirect "index.asp" end if %>