• 第五届西安(浐灞)金融高峰论坛召开 2019-08-23
  • 羡慕吗?品虾师每天吃两斤小龙虾 2019-08-16
  • 我们没有足够的力量来威慑?人民中大多数肯定是不能再接受清式双赢的。俺很想尝尝历战总是赢家给咱准备的“后果”,这次不吃肯定会长到吃不吃由不得我。告诉世界:不要让我 2019-08-13
  • 广州记忆丨无龙舟不端午!没有强劲臂弯的龙船发烧友不是好的传承人 2019-08-13
  • 国务院:全面禁止洋垃圾入境   2019-08-11
  • 海岸旅行地中国国家地理网 2019-08-09
  • "情系民歌 让爱传递"义卖活动 传递社会正能量 2019-08-08
  • 巴彦淖尔--内蒙古频道--人民网 2019-08-08
  • 广州旅游为何爆发出强大且持续的吸引力 2019-08-02
  • 《平凡的荣耀》展现上海风情 赵又廷新剧打破职场剧套路 2019-07-29
  • 垃圾袋里有碎玻璃 贴上标签才放心扔 2019-07-29
  • 日本大阪6.1级强震4死逾300伤 工厂及店铺恢复运营 2019-07-25
  • 太原网友:建议公交调整河西线路 2019-07-21
  • 纪念马克思诞辰200周年 2019-07-17
  • 金融战,贸易战,是看不见硝烟的战争,但代价同样是惨烈的。面对强敌,奉陪到底,打好这场事关国运之战。 2019-07-17
  • 网站广播 本站提供的源码经过测试,有前台及后台管理界面演示图,免费下载!
    ASP实现301域名重定向代码
    2014-12-03 12:44:55    【 】   浏览:
    分享一例asp实现301域名重定向的代码,使用301域名重定向可以把不带www的顶级域名转向到带www的域名。

    湖北福彩快三走势图 www.kqbz.net  

    代码如下:
    <%
    '--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","//www."&Server_Name
    Else  
       Response.AddHeader "Location","//www."&Server_Name&Path_infostr&Query_Stringstr  
    End if 
      Response.End 
    End if %>


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

    广告推荐

    ASP技术文章推荐阅读

  • 第五届西安(浐灞)金融高峰论坛召开 2019-08-23
  • 羡慕吗?品虾师每天吃两斤小龙虾 2019-08-16
  • 我们没有足够的力量来威慑?人民中大多数肯定是不能再接受清式双赢的。俺很想尝尝历战总是赢家给咱准备的“后果”,这次不吃肯定会长到吃不吃由不得我。告诉世界:不要让我 2019-08-13
  • 广州记忆丨无龙舟不端午!没有强劲臂弯的龙船发烧友不是好的传承人 2019-08-13
  • 国务院:全面禁止洋垃圾入境   2019-08-11
  • 海岸旅行地中国国家地理网 2019-08-09
  • "情系民歌 让爱传递"义卖活动 传递社会正能量 2019-08-08
  • 巴彦淖尔--内蒙古频道--人民网 2019-08-08
  • 广州旅游为何爆发出强大且持续的吸引力 2019-08-02
  • 《平凡的荣耀》展现上海风情 赵又廷新剧打破职场剧套路 2019-07-29
  • 垃圾袋里有碎玻璃 贴上标签才放心扔 2019-07-29
  • 日本大阪6.1级强震4死逾300伤 工厂及店铺恢复运营 2019-07-25
  • 太原网友:建议公交调整河西线路 2019-07-21
  • 纪念马克思诞辰200周年 2019-07-17
  • 金融战,贸易战,是看不见硝烟的战争,但代价同样是惨烈的。面对强敌,奉陪到底,打好这场事关国运之战。 2019-07-17
  • 十一选五今天开奖结果25号 七走势图带连线走势图 北京pk10谁控制的彩娱 广东36选7历史开奖号码查询 宁夏十一选五实时走势图 福建七星彩走势图 手机真钱棋牌游戏平台 搜狐北京赛车pk10开奖 350无限德州扑克第9 7m篮球比分nba 海南环岛赛彩票奖金 彩票网站大全 特准特马资料唯 青海十一选五玩法 彩票走势图大全带连线