分享ASP实现301域名重定向代码

发布时间：2023-04-24 13:38:23 所属栏目：Asp教程来源：

导读：分享一例asp实现301域名重定向的代码，使用301域名重定向可以把不带www的顶级域名转向到带www的域名。

代码如下:

<%

'--301域名重定向

Dim Server_Name,Path_infostr,Query_Stringstr

Path_i

分享一例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 %>

（编辑：聊城站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!