• 首页
• 服务器租用
• 企业邮箱
• 虚拟主机
• 网站程序
• 营销推广
• 网站建设
• 域名注册
• 前端开发
• 网站备案

• 当前位置：创新互联 >> 常见问题 >> 网站程序 >> asp程序 >> ASP怎么实现301重定向

ASP怎么实现301重定向

• 作者：创新互联 文章来源：网络运营部 点击数： 更新时间：2014-12-24
• 为什么要使用301重定向？
  答：使用301重定向可以把不带www的域名转向带www的域名，这样可以把权重全部指向带有www的域名，对网站优化很有帮助。
  怎么在代码中实现301重定向？
  

  答：在数据库连接文件里加入以下代码即可实现。

  
  

  
  

  
  

  <%
  Dim Server_Name,Path_infostr,Query_Stringstr
  Path_infostr=lcase(request.ServerVariables("PATH_INFO"))
  Server_Name=lcase(request.ServerVariables("Server_Name"))
  Query_Stringstr=request.ServerVariables("Query_String")
  If Query_Stringstr<>"" Then Query_Stringstr="?"&Query_Stringstr
  IF instr(Server_Name,"www.")<1 Then
  Response.Status = "301 Moved Permanently"
  if instr(Path_infostr,"index")>0 or instr(Path_infostr,"default")>0  Then
  Response.AddHeader "Location","http://www."&Server_Name
  Else
  Response.AddHeader "Location","http://www."&Server_Name&Path_infostr&Query_Stringstr
  End if
  Response.End
  End if
  %>
  

• ASP判断是否是域名或IP :上一篇
  如何使用asp（jmail）组件发送邮件 :下一篇