程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> 關於ASP編程 >> ASP怎麼實現301重定向

ASP怎麼實現301重定向

編輯:關於ASP編程

     使用301重定向可以把不帶www的域名轉向帶www的域名,這樣可以把權重全部指向帶有www的域名,對網站優化很有幫助。

    <% 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 %>

    1. 上一頁:
    2. 下一頁:
    Copyright © 程式師世界 All Rights Reserved