簡(jiǎn)單ASP判斷是否手機訪(fǎng)問(wèn)自動(dòng)進(jìn)入手機站

發(fā)布日期：[2014/4/29] 編輯：奇億廣州網(wǎng)站建設

隨著(zhù)移動(dòng)互聯(lián)網(wǎng)的發(fā)展加速，互聯(lián)網(wǎng)巨頭仍未停止移動(dòng)終端入口的爭奪戰，眾多企業(yè)對于移動(dòng)互聯(lián)網(wǎng)的速度也在不斷加快。而作為網(wǎng)絡(luò )營(yíng)銷(xiāo)的主要載體，網(wǎng)站建設的核心也正在逐漸向手機終端遷移。最具有代表性的莫過(guò)于企業(yè)在網(wǎng)站建設選擇中開(kāi)始考慮手機網(wǎng)站、手機APP、微商城等形式，而并非單一的PC網(wǎng)站。

雖然目前沒(méi)有任何一家互聯(lián)網(wǎng)公司能夠對移動(dòng)互聯(lián)網(wǎng)網(wǎng)站建設以及搜索引擎規則能夠做出全部正確的解釋?zhuān)瓦B中文搜索第一入口的百度搜索也仍然在移動(dòng)互聯(lián)網(wǎng)上使用PC端的搜索法則，但不可否認的是，移動(dòng)互聯(lián)網(wǎng)時(shí)代已經(jīng)到來(lái)。

在2014年互聯(lián)網(wǎng)白皮書(shū)中，百度首次將移動(dòng)網(wǎng)站與PC網(wǎng)站分開(kāi)敘述，并且對手機網(wǎng)站的建設提出了初步的建議，當然，這些建議大多數是相對網(wǎng)站建設本身而言。這其中就包括支持使用優(yōu)質(zhì)的HTML5資源，對百度split做適配跳轉，使用獨立域名等。

雖然一些網(wǎng)站建設企業(yè)打出了精通各種手機網(wǎng)站建設，甚至能夠設計出PC+手機+微信+APP+平板等四合一或五合一的“全能型網(wǎng)站”來(lái)，但從居高不下的手機網(wǎng)站造價(jià)來(lái)看，我們就知道，其實(shí)移動(dòng)網(wǎng)站的建設技術(shù)仍未成熟，移動(dòng)互聯(lián)網(wǎng)如何發(fā)展，如何搶占移動(dòng)終端的先機，仍然是困擾所有互聯(lián)網(wǎng)企業(yè)的一個(gè)難題。

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

本次小編所分享的內容就是，在PC+手機二合一的網(wǎng)站中，網(wǎng)站如何能夠正確判斷用戶(hù)是從PC端還是移動(dòng)端的來(lái)訪(fǎng)，并且根據用戶(hù)的來(lái)訪(fǎng)路徑來(lái)決定是分配手機網(wǎng)站還是PC網(wǎng)站。經(jīng)過(guò)一段時(shí)間的研究及摸索，奇億網(wǎng)絡(luò )已經(jīng)完全掌握了其規律，今天就將辦法分享給大家。很簡(jiǎn)單的方式，只要一段簡(jiǎn)單的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()%>

這段代碼經(jīng)過(guò)奇億網(wǎng)絡(luò )的多次測試，100%有用。<%
Sub Check_Wap()
dim MoblieUrl,reExp,MbStr
MoblieUrl="http://www.stud.net.cn"''手機網(wǎng)站路徑
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
%>

另外網(wǎng)絡(luò )收集另一ASP判斷是否手機訪(fǎng)問(wèn)辦法，時(shí)間關(guān)系未試，請各位有興趣讀者自行測試。

以下是引用片段：
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特定信息品牌機自帶瀏覽器都會(huì )有
HTTP_UA_OS=Request.ServerVariables("HTTP_UA_OS")                   ’手機系統電腦為空
HTTP_VIA=LCase(Request.ServerVariables("HTTP_VIA"))                ’網(wǎng)關(guān)信息
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 "我是手機訪(fǎng)問(wèn)"
   ’’ response.redirect "wap.asp"
else
    Response.Write "我是PC訪(fǎng)問(wèn)"
   ’’ response.redirect "Pc.asp"
End if

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