ASP实现301域名重定向代码
2014-12-03 12:44:55    【 】   浏览:
分享一例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 %>


Tags:ASP 实现 301 域名 重定向 代码
】【打印繁体】【关闭】 【返回顶部
上一篇ASP生成不重复随机数的实例代码 下一篇ADODB.Connection 错误 '800a..

广告推荐

ASP技术文章推荐阅读

21点游戏安卓 幸运28评测 天津体彩11选5 1188博彩资讯 雅戈尔股票 江西快3软件下载 非公开发行股票是利好吗 内蒙古快三49期链接 黑龙江十一选五开奖结果1002无标题 上海时时乐计划胆码 富成配资 北京快乐8漏洞 上海十一选五最新开奖历史 好运彩手机版下载 重庆幸运农场人工计划 中国福利彩票东方6十1开奖 基金配资地址