<% 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 - Property Law Konwledge Bank
Home --> Help --> Morgan Randall Knowledge Bank
Bookmark and Share

Morgan Randall Property Law Knowledge Bank