请大家帮我看一下这个301怎么写啊，我等了好久了

用以下代码，跳转后的结果是跳转后的结果是：http://然后页面显示是404
<%
'修改，301定向到主域名
Dim strHOST,goURL
strHOST = LCase(Request.ServerVariables("HTTP_HOST"))'域名转换为小写
if Request.ServerVariables("QUERY_STRING")<>"" then '含有参数则
   goURL="www.("QUERY_STRING")&"#from301="&strHOST
else   '不含参数则
   goURL="www.
end if
  if strHOST<>"www. then  '域名不是则
    Response.Status = "301 Moved Permanently"
    Response.AddHeader "Location",goURL
    Response.End
  else        
  end if
%>
我想将不带www的跳到带www，空间是万网M2
网址结构是首页 ***.cn或者***.cn/?main.html
频道页 ***.cn/?new
内页 ***.cn/?new/1.html