ASP URL Redirect Example

ASP URL Redirect Example


<% @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
%>