目标: 实现手机与电脑访问同一个网址,跳转到不同的服务页面. 电脑访问abc.com 跳转到www.abc.com ,手机访问abc.com,跳转到wap.abc.com

 

原理: 通过获取浏览器信息,来做跳转,首先用一个测试页面,获取不同的浏览器信息,从而做出判断.例如做一个show.asp

<%=Request.ServerVariables("ALL_HTTP")%>

得到如下,可以获得很多其他的信息,通过查找这些信息中特定的字符串,从而判断客户端所用的浏览器.

 

HTTP_CONNECTION:keep-alive
HTTP_ACCEPT:application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,*/*;q=0.5
HTTP_ACCEPT_CHARSET:GBK,utf-8;q=0.7,*;q=0.3
HTTP_ACCEPT_ENCODING:gzip,deflate,bzip2
HTTP_ACCEPT_LANGUAGE:zh-CN,zh;q=0.8
HTTP_COOKIE:rtime=10; ltime=1282112304536; cnzz_eid=80966359-1279618951-http%3A//220.232.136.162/; ASPSESSIONIDACQRASRR=KMIJPFOCDAPFJMLMBPLFJMAJ HTTP_HOST:www.securepro.com.hk
HTTP_USER_AGENT:Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US) AppleWebKit/531.0 (KHTML, like Gecko) Chrome/3.0.195.0 Safari/531.0 SE 2.X

 

具体实现代码如下:

<%
If InStr(LCase(Request.ServerVariables("HTTP_ACCEPT")),"text/vnd.wap.wml") > 0 Then
Response.Redirect
"big5/index.htm"
Elseif InStr(LCase(Request.ServerVariables("HTTP_USER_AGENT")),"iphone") > 0 Then
Response.Redirect
"big5/index.htm"
else
Response.Redirect
"index.html"
end if
%
>
posted on 2010-09-01 13:26  sn_wolf  阅读(2328)  评论(0编辑  收藏  举报