ASP怎么实现301重定向

来源:转载

为什么要使用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
%>

分享给朋友:
您可能感兴趣的文章:
随机阅读: