用免费asp空间做301重定向

编程开发 / , , / at

www域名301重定向到不带www的怎么转,本文解决效果:访问www.fend.cn,301到fend.cn,从而避免搜索引擎的重复收录,达到搜索引擎友好的效果
把以下代码保存为index.asp,上传到支持Asp和顶级域名绑定的免费Asp空间,然后在免费Asp空间后台设置index.asp为默认首页,并绑定www.fend.cn(举例)

<%
 dim s_domain
 s_domain=lcase(Request.ServerVariables("SERVER_NAME"))
 if instr(1,s_domain,"www.qqcampus",1)>0 then
  Response.Status="301 Moved Permanently"
  Response.AddHeader "Location", "http://fend.cn"
  Response.End
 end if
%>

需要注意一点的是,如果是要把fend.cn转到带www的www.fend.cn上,这样做是不对的,因为asp301重定向代码instr(1,s_domain,”qqcampus”,1)>0的意思是域名里包含qqcampus,而fend.cn和www.fend.cn都包含这个,则会造成死循环,应该做一些改动:

<%
 dim s_domain
 s_domain=lcase(Request.ServerVariables("SERVER_NAME"))
 if s_domain="fend.cn" then
  Response.Status="301 Moved Permanently"
  Response.AddHeader "Location", "http://www.fend.cn"
  Response.End
 end if
%>

或者这样也行

<%
 dim s_domain
 s_domain=lcase(Request.ServerVariables("SERVER_NAME"))
 if instr(1,s_domain,"qqcampus",1)>0 and instr(1,s_domain,"www",1)=0 then
  Response.Status="301 Moved Permanently"
  Response.AddHeader "Location", "http://www.fend.cn"
  Response.End
 end if
%>

最简单的ASP301永久重定向代码
<

<%
Response.Status=”301 Moved Permanently”
Response.AddHeader “Location”,” http://fend.cn/”
Response.End
%>

5条回应:“用免费asp空间做301重定向”

  1. […] GlobeTour的传说 « 用免费asp空间做301重定向 UPHClean […]

  2. 刘二闯博客说道:

    访问测试结果出现文字 怎么办?

  3. free301说道:

    直接用这个网站就可以了,这个网站是提供免费301重定向服务的。没有必要写代码。

  4. free301说道:

    直接用http://www.free301.com这个网站就可以了,这个网站是提供免费301重定向服务的。没有必要写代码。

发表评论

电子邮件地址不会被公开。 必填项已用*标注