<% @LANGUAGE = VBScript %>
<% Option Explicit %>
<%
Response.Expires = 0
Dim strServerName
strServerName = Request.ServerVariables("SERVER_NAME")
Select Case strServerName
Case "www.webSiteOne.com"
Response.Redirect("f01b-i.asp")
Case "www.webSiteTwo.com"
Response.Redirect("f01b-ii.asp")
Case Else
Response.Redirect("f01b-iii.asp")
End Select
%>