tion %> 山东麻将点炮规则
當前位置:首頁 > 建站知識

手機訪問判斷代碼

更新時間:2011.09.02 瀏覽次數:

<%
set regex = new regexp
regex.ignorecase = true
regex.global = true
regex.pattern = "mini 9.5|vx1000|lge |m800|e860|u940|ux840|compal|wireless| mobi|ahong|lg380|lgku|lgu900|lg210|lg47|lg920|lg840|lg370|sam-r|mg50|s55|g83|t66|vx400|mk99|d615|d763|el370|sl900|mp500|samu3|samu4|vx10|xda_|samu5|samu6|samu7|samu9|a615|b832|m881|s920|n210|s700|c-810|_h797|mob-x|sk16d|848b|mowser|s580|r800|471x|v120|rim8|c500foma:|160x|x160|480x|x640|t503|w839|i250|sprint|w398samr810|m5252|c7100|mt126|x225|s5330|s820|htil-g1|fly v71|s302|-x113|novarra|k610i|-three|8325rc|8352rc|sanyo|vx54|c888|nx250|n120|mtk |c5588|s710|t880|c5005|i;458x|p404i|s210|c5100|teleca|s940|c500|s590|foma|samsu|vx8|vx9|a1000|_mms|myx|a700|gu1100|bc831|e300|ems100|me701|me702m-three|sd588|s800|8325rc|ac831|mw200|brew |d88|htc\/|htc_touch|355x|m50|km100|d736|p-9521|telco|sl74|ktouch|m4u\/|me702|8325rc|kddi|phone|lg |sonyericsson|samsung|240x|x320vx10|nokia|sonycmd|motorola|up.browser|up.link|mmp|symbian|smartphone|midp|wap|vodafone|o2|pocket|kindle|mobile|psp|treo|iris|3g_t|windows ce|opera mobi|windows ce; smartphone;|windows ce; iemobile|ipod|iphone|android|opera mini|blackberry|palm os|palm|hiptop|avantgo|fennec|plucker|xiino|blazer|elaine|iris|3g_t|windows ce|opera mobi|windows ce; smartphone;|windows ce; iemobile"

agent = request.ServerVariables("HTTP_USER_AGENT") & ""
if agent <> "" then
 'Response.Write("<span class=""STYLE2"">"&agent&"</span>")
 dim Matches,Match
 set Matches = regex.Execute(agent)
 
 
 For Each Match in Matches
 ' RetStr= RetStr & "Match found at position:"
 ' RetStr= RetStr & Match.Firstindex & "<br>" & "Match Value is'"
 ' RetStr= RetStr & Match.Value & "'" & "<br>"
  
  
 next
 Response.Write("<br><span class=STYLE2>"&RetStr&"</span>")
 
 if not regex.test(agent) then
 '不是從手機來的訪問,跳轉到your.domain.com
 %>
 
    <span class="STYLE2"> 對不起,該網頁專為手機用戶提供,請使用手機瀏覽!</span>
 <%
   response.end
 else
  
 end if
 
end if

烟台麻将规则 七位数历史开奖走势图 排列五带坐标连线图 黑龙江快乐10分预测 比分直播足球爱彩 3d历史开奖号及试机号 陕西11选5 st股票涨跌幅度 重庆时时彩开奖结果 别墅赚钱吗 广东快乐10分 快乐10分钟开奖结果陕西今天 pc28杀组合预测软件 畅享8赚钱 华体比分直播 几台空闲电脑可以做什么赚钱 青鹏棋牌手机