<%
serverURL = Request.ServerVariables("SERVER_NAME")
if (strcomp(serverURL,"ipsid.com",1)=0) Then serverURL = "www.ipsid.com"
normalserverURL = "http://" & serverURL
secureserverURL = "https://" & serverURL
If (Session("normalserver") = "") Then Session("normalserver") = normalserverURL
If (Session("secureserver") = "") Then Session("secureserver") = secureserverURL
normalserver = Session("normalserver")
secureserver = Session("secureserver")
' Redirect to any child sites. The first page MUST be in the root, or all your session values will
' be lost when you do go to the root.
'
If (instr(1,Request.ServerVariables("SERVER_NAME"),"cpl.ipsid.com",1) > 0) Then Response.Redirect "/cpl/"
If (instr(1,Request.ServerVariables("SERVER_NAME"),"steris.enterpriseid.com",1) > 0) Then Response.Redirect "/steris/"
If (instr(1,Request.ServerVariables("SERVER_NAME"),"legacyvillage.ipsid.com",1) > 0) Then Response.Redirect "/isolve/"
'
' copyright 2002 Rampant, Inc. [http://www.rampant.com, (216) 524-5577, support@rampant.com]
'
%>
Welcome to IPS
