<tt id="sh663"></tt>

          愛情故事情感網

          www.materialhandler.net

          注冊 / 登錄

          感人文章

          愛情故事

          情感文章

          傷感日志

          網絡日記

          12星座

          好文章

          家常菜

          許愿祝福

          熱門搜索

          當前位置: 愛情故事情感網 -> 妙招大全 -> 根據來路域名將客戶轉向到不同頁面的ASP代碼

          根據來路域名將客戶轉向到不同頁面的ASP代碼

          訪問數:952次 作者小鮑 發表日期:2011-07-16 12:50:36

          asp代碼
          <%
          if request.servervariables(""server_name"")=""chinainf.cn"" then
          response.redirect(""/1"")
          else if request.servervariables(""server_name"")=""www.chinainf.cn"" then
          response.redirect(""/1"")
          else
          response.redirect(""/2"")
          end if
          %>

          ASP

          第一個
          <%if Request.ServerVariables(""SERVER_NAME"")=mouse.net"" then
          response.redirect ""zkj""
          else
          response.redirect ""i.htm""
          end if%>

          第二個
          <%
          select case request.servervariables(""http_host"")
          case ""mouse.net.ru"" 1
          Server.Transfer(""v3.htm"")
          case ""im286.net.ru"" 2
          Server.Transfer(""i.htm"")
          case ""www.mouse.net"" 3
          Server.Transfer(""yyjs.htm"")
          ...... 繼續添加 ......
          end select
          %>

          第三個
          <%if instr(Request.ServerVariables
          (""SERVER_NAME""),""mouse.net.ru"")>0 then
          response.redirect ""index.asp""
          else if instr(Request.ServerVariables
          (""SERVER_NAME""),""im286.net.ru"")>0 then
          response.redirect ""x/index.asp""
          else if instr(Request.ServerVariables
          (""SERVER_NAME""),""www.im286.net.ru"")>0 then
          response.redirect ""index3.asp""
          end if
          end if
          end if%>

          第四個
          <%if Request.ServerVariables(""SERVER_NAME"")=""mouse.net.ru""
          then
          response.redirect ""index1.asp""
          else if Request.ServerVariables(""SERVER_NAME"")=""im286.net.ru"" then
          response.redirect ""index2.asp""
          else if Request.ServerVariables(""SERVER_NAME"")=""www.mouse.net.ru"" then
          response.redirect ""index3.asp""
          end if
          end if
          end if%>


          第五個
          <%
          取得HTTP輸入的值并付值到HTOST中
          host=lcase(request.servervariables(""HTTP_HOST""))
          開始條件跳轉
          select CASE host
          如果HOST的值是mouse.net.ru就選擇事件case""mouse.net.ru""的命令
          CASE ""mouse.net.ru""
          Below is the redirect command
          response.redirect ""index1.htm""
          CASE ""im286.net.ru""
          Below is the redirect command
          response.redirect ""/blog""

          We use CASE ELSE to fix any other requests
          CASE ELSE

          其他方式訪問的目錄
          response.redirect ""/index1.htm""
          END select
          %>

           

          JS

          <script>try {if( self.location == ""http://玉米一/"" ) {
          top.location.href = ""http://玉米一/目錄"";
          }
          else if( self.location == ""http://玉米二/"" ) {
          top.location.href = ""http://玉米二/目錄"";
          }
          else if( self.location == ""http://玉米三/"" ) {
          top.location.href = ""http://玉米三/目錄"";
          }
          else if( self.location == ""http://玉米四/"" ) {
          top.location.href = ""http://玉米四/目錄"";
          }
          else {document.write (""錯誤的訪問地址"")}} catch(e) {}</script>

          <%
          Dim MyName 默認www.materialhandler.net站首頁文件名
          MyName = Lcase(Request.ServerVariables(""http_host"")) 取得當前工作訪問的服務器名,并轉換成小寫,返回結果如www.im286.com,im286.com,SenFe.im286.com等
          MyName = Mid(MyName,1,InStr(MyName,""."")-1) 取得當前訪問的二級域名名字,也就是第一個小數點.左邊的部分,返回結果如www,im286,senfe等

          If MyName=""www"" Or MyName=""im286"" Then
          Response.Redirect ""/Index.Htm"" 當名字為www,或者沒有時(取得是im286),則轉向默認首頁地址
          Else
          Response.Redirect ""/"" & MyName & ""/"" 轉向以用戶名命名的目錄
          End If
          Response.End
          %>

          0    0

          上一篇:無
          下一篇:經典DIV+CSS代碼 經典的三行兩列DIV+CSS代碼布局
          以下內容為愛情故事情感網妙招大全根據來路域名將客戶轉向到不同頁面的ASP代碼的評論與回復
          回復此貼:
          用戶協議:不欺詐 不虛假 不違法 不發表攻擊言論 不損人利己
          愛情故事情感網-最感人的文章-最感人的愛情故事-好文章-情感故事-最新經典傷感日志大全
          © 2007-2021 www.materialhandler.net >>  Email:770111722@qq.com
          遼ICP備08005173號
          pk10聊室 www.heritagehandbag.com:武城县| www.lujiahuanbao.com:托克逊县| www.180xu.com:涪陵区| www.davisdeyoe.com:古丈县| www.hg43678.com:上林县| www.onewaytoliveband.com:连南| www.nogoum-b.com:班玛县| www.yookow.com:甘洛县| www.tmcmotor.com:沾化县| www.cp7713.com:枣强县| www.getallsites.com:开远市| www.gmbmw.com:桃园市| www.midifa.com:彭泽县| www.smashingoffernow.com:绥阳县| www.biosourcepharm.com:句容市| www.foldagamechanger.com:安多县| www.m8ga.com:历史| www.lunglinks.com:孟村| www.hg41678.com:隆昌县| www.jordantrainerprime.com:太康县| www.sdwlcc.com:洛宁县| www.radiolauniversal.com:天门市| www.hisfountain.net:泰宁县| www.wwwhg7825.com:昌邑市| www.huidenhd.com:常州市| www.jordantrainerprime.com:神农架林区| www.dghrx.com:江西省| www.yzasiaexpo.com:宜丰县| www.beautysalonsolutions.com:汉寿县| www.nesemancreative.com:沂源县| www.shshangwei.com:延长县| www.hhlbw.cn:长汀县| www.abtqq.com:株洲市| www.beautyincarnate.com:临潭县| www.mcmhonmono.com:万全县| www.tradersofcamden.com:年辖:市辖区| www.n3969.com:灯塔市| www.air-max-run.com:大渡口区| www.nbyxkg.com:韩城市| www.ynlcdcj.com:临夏县| www.xsxonline.com:丹凤县| www.edenspringshotel.com:三原县| www.alongtheway-mdt.com:罗平县| www.service-moto.net:治县。| www.bieber-fever.net:溧阳市| www.treasuredspotbookreviews.com:浦城县| www.maadqr-app.com:太谷县| www.zppcloud.com:巴青县| www.3dcursors.com:保康县| www.wrenandlark.net:安平县| www.potap-nastya.net:古蔺县| www.uuxer.com:祁东县| www.shipwatch.org:泾源县| www.lavinialewis.com:凤阳县| www.mmn2015.org:内丘县| www.bwbuffaloridgeinn.com:习水县| www.cinplatcorporate.com:抚顺县| www.auktis.com:平陆县| www.yz-tygy.com:呼和浩特市| www.salsa-101.com:长葛市| www.zyjymy.com:兴业县| www.ledlightdiecasting.com:延吉市| www.chinesedrywallinspect.com:垫江县| www.sonstudios.org:精河县| www.ordynacka.com:定结县| www.xggtw.cn:乐清市| www.wsr7.com:二连浩特市| www.firmarehberisitesi.com:绥芬河市| www.kenyahotelresort.com:冀州市| www.hdy521.com:蒙自县| www.guowangdewangguo.com:麻栗坡县| www.elalumbramiento.org:靖西县| www.joomlaku.com:玛曲县| www.elongli.com:淮北市| www.stephanielajoie.com:册亨县| www.lsyteam.com:轮台县| www.cyber-sst.com:松溪县| www.shophapi.com:蛟河市| www.accwangxiao.com:简阳市| www.avalonwarriors.com:龙陵县| www.hg62345.com:金沙县| www.fitnessghost.com:会泽县| www.g8565.com:射阳县| www.sweetarch.com:峨山|