簡單ASP判斷是否手機訪問自動進入手機站

發布日期：[2014/4/29] 編輯：奇億廣州網站建設

隨著移動互聯網的發展加速，互聯網巨頭仍未停止移動終端入口的爭奪戰，眾多企業對于移動互聯網的速度也在不斷加快。而作為網絡營銷的主要載體，網站建設的核心也正在逐漸向手機終端遷移。最具有代表性的莫過于企業在網站建設選擇中開始考慮手機網站、手機APP、微商城等形式，而并非單一的PC網站。

雖然目前沒有任何一家互聯網公司能夠對移動互聯網網站建設以及搜索引擎規則能夠做出全部正確的解釋，就連中文搜索第一入口的百度搜索也仍然在移動互聯網上使用PC端的搜索法則，但不可否認的是，移動互聯網時代已經到來。

在2014年互聯網白皮書中，百度首次將移動網站與PC網站分開敘述，并且對手機網站的建設提出了初步的建議，當然，這些建議大多數是相對網站建設本身而言。這其中就包括支持使用優質的HTML5資源，對百度split做適配跳轉，使用獨立域名等。

雖然一些網站建設企業打出了精通各種手機網站建設，甚至能夠設計出PC+手機+微信+APP+平板等四合一或五合一的“全能型網站”來，但從居高不下的手機網站造價來看，我們就知道，其實移動網站的建設技術仍未成熟，移動互聯網如何發展，如何搶占移動終端的先機，仍然是困擾所有互聯網企業的一個難題。

在這種背景下，一些希望獲得移動終端先機的企業會在經過權衡之后，會通過轉碼或者建設PC+手機二合一的方式網站來進行運營。但搜索引擎本身的轉碼有時候并不能為網站作很好的呈現，并且會在網站上加上搜索引擎合作方的廣告，因而，PC+移動二合一的方式就是移動網站的首選。

本次小編所分享的內容就是，在PC+手機二合一的網站中，網站如何能夠正確判斷用戶是從PC端還是移動端的來訪，并且根據用戶的來訪路徑來決定是分配手機網站還是PC網站。經過一段時間的研究及摸索，奇億網絡已經完全掌握了其規律，今天就將辦法分享給大家。很簡單的方式，只要一段簡單的ASP代碼即可。代碼如下：

<%
Sub Check_Wap()
dim MoblieUrl,reExp,MbStr
MoblieUrl= Set reExp = New RegExp
MbStr="Android|iPhone|UC|Windows Phone|webOS|BlackBerry|iPod"
reExp.pattern=".*("&MbStr&").*"
reExp.IgnoreCase = True
reExp.Global = True
If reExp.test(Request.ServerVariables("HTTP_USER_AGENT")) Then
response.redirect MoblieUrl
response.End
End If
End Sub
%>
調用<%call Check_Wap()%>

這段代碼經過奇億網絡的多次測試，100%有用。<%
Sub Check_Wap()
dim MoblieUrl,reExp,MbStr
MoblieUrl="http://www.stud.net.cn"''手機網站路徑
Set reExp = New RegExp
MbStr="Android|iPhone|UC|Windows Phone|webOS|BlackBerry|iPod"
reExp.pattern=".*("&MbStr&").*"
reExp.IgnoreCase = True
reExp.Global = True
If reExp.test(Request.ServerVariables("HTTP_USER_AGENT")) Then
response.redirect MoblieUrl
response.End
End If
End Sub
%>

另外網絡收集另一ASP判斷是否手機訪問辦法，時間關系未試，請各位有興趣讀者自行測試。

以下是引用片段：
HTTP_ACCEPT=Request.ServerVariables("HTTP_ACCEPT")                 ’獲取瀏覽器信息
HTTP_USER_AGENT=LCase(Request.ServerVariables("HTTP_USER_AGENT"))  ’獲取AGENT
HTTP_X_WAP_PROFILE=Request.ServerVariables("HTTP_X_WAP_PROFILE")   ’WAP特定信息品牌機自帶瀏覽器都會有
HTTP_UA_OS=Request.ServerVariables("HTTP_UA_OS")                   ’手機系統電腦為空
HTTP_VIA=LCase(Request.ServerVariables("HTTP_VIA"))                ’網關信息
Dim WapStr
WAPstr=False
If ubound(split(HTTP_ACCEPT,"vnd.wap"))>0 Then WAPstr=True
If HTTP_USER_AGENT="" Then  WAPstr=True
If HTTP_X_WAP_PROFILE<>"" Then  WAPstr=True
If HTTP_UA_OS<>"" Then  WAPstr=True
IF ubound(split(HTTP_VIA,"wap"))>0 Then  WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"netfront"))>0 Then  WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"iphone"))>0 Then  WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"opera mini"))>0 Then  WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"ucweb"))>0 Then  WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"windows ce"))>0 Then  WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"symbianos"))>0 Then  WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"java"))>0 Then  WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"android"))>0 Then  WAPstr=True
If WAPstr=True Then
    Response.Write "我是手機訪問"
   ’’ response.redirect "wap.asp"
else
    Response.Write "我是PC訪問"
   ’’ response.redirect "Pc.asp"
End if

本次的分享到這里結束。手機網站會在一定時期成為互聯網發展的潮流。當然，在更遠的未來，能夠適應各種設備瀏覽，無論是PC、平板電腦還是各種分辨率的手機都能夠得到最佳程度展現的網站建設類型才會是眾望所歸。我們仍然在這條路上努力探索，并且會不定時跟大家分享我們的成果。如果你希望和我們一起分享或者有一些更好的建議，歡迎聯系我們。