<% checkWWW=request.ServerVariables("SERVER_NAME") ' ----------------------------------------------- ' this line will redirect to actual page name to the redirect Dim SetAction SetAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then SetAction = SetAction & "?" & Server.HTMLEncode(Request.QueryString) End If ' ----------------------------------------------- if cint(instr(trim(checkWWW),"www"))=cint(0) then response.status="301 moved permanently" Response.AddHeader "Location", "http://www." &checkWWW&SetAction end if %> Morgan Randall Sitemap
Home --> Site Map
Bookmark and Share

Site Map

Do you have a
property to let?

We let
property fast.

Let my property

Are you?

Hard working
Determined
Passionate
Pro-active
Ambitious
Energetic
Creative
Driven?

Why
Not...

Join our team