%
Dim strDomain, strURL, strQueryString, strHTTPPath,vTempNum
strDomain = LCase(request.ServerVariables("HTTP_HOST"))
If Left(strDomain, 10) <> "www.promar" Then
strHTTPPath = Request.ServerVariables("PATH_INFO")
strQueryString = Request.ServerVariables("QUERY_STRING")
strURL = "http://www." & "promarperformanceengines.com" & strHTTPPath
If len(strQueryString) > 0 Then strURL = strURL & "?" & strQueryString
Response.Status = "301 Moved Permanently"
Response.AddHeader "Location", strURL
End If
%>
Error Page
Error Page
The file or folder you were looking for does not exist. Please click the link below to
visit our homepage.
|
|