ASP完成301域名重定向代码
发布时间：2022-04-12 04:36:42 所属栏目：Asp教程 来源：互联网
导读：分享一例asp实现301域名重定向的代码，使用301域名重定向可以把不带www的顶级域名转向到带www的域名。 代码如下: % --301域名重定向 Dim Server_Name,Path_infostr,Query_Stringstr Path_infostr=lcase(request.ServerVariables(PATH_INFO)) Server_Name=lc
|
分享一例asp实现301域名重定向的代码，使用301域名重定向可以把不带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 %> （编辑：济南站长网） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |
