龙空技术网

asp版判断是否手机访问网站

邯郸升学指导 61

前言:

此刻朋友们对“asp记录用户访问信息”可能比较注重,咱们都需要了解一些“asp记录用户访问信息”的相关文章。那么小编同时在网上搜集了一些对于“asp记录用户访问信息””的相关资讯,希望看官们能喜欢,同学们快快来学习一下吧!

ub 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

标签: #asp记录用户访问信息