让你的WAP网站有更好的兼容性
类别: ASP教程
今天看到朋友的WAP网站的首页用IE和WAP手机都能浏览
看来他一定是做了对浏览器的检查,如果不支持WML的话就redirect
仔细想了一下,Redirect只是对于不支持WML的浏览器做的操作(比如IE)
所以 Response.Redirect还是可以用的,关键是如何判断浏览器是否支持
于是跟朋友要代码看,结果得到了这个:
if (strpos("wap", $_HTTP_GET_VARS[\'http_accept\'])) { header("Location: http://hikey.net");}
PHP的代码......
但是我的程序是ASP阿,于是就有又有了这段代码:
<%
Response.Buffer = TRUE
Dim IsWap
httpAccept = LCase(Request.ServerVariables("HTTP_ACCEPT"))
if Instr(httpAccept,"wap") then
IsWap=1
Else
Response.Redirect "http://www.gelon.net/cgi-bin/wapalize.cgi?url=http://hikey.net/wap"
Response.End
End if
%>
把这段代码加在你WAP页的头上(最头上!)就做到了:如果浏览器不支持的话,就把它重定向到Gelon.net提供的WAP模拟器上 URL=后面的可以改成你的网站地址
就算是别人只知道你的网址,不知道你的网站该如何访问,他也可以看到效果了...
看来他一定是做了对浏览器的检查,如果不支持WML的话就redirect
仔细想了一下,Redirect只是对于不支持WML的浏览器做的操作(比如IE)
所以 Response.Redirect还是可以用的,关键是如何判断浏览器是否支持
于是跟朋友要代码看,结果得到了这个:
if (strpos("wap", $_HTTP_GET_VARS[\'http_accept\'])) { header("Location: http://hikey.net");}
PHP的代码......
但是我的程序是ASP阿,于是就有又有了这段代码:
<%
Response.Buffer = TRUE
Dim IsWap
httpAccept = LCase(Request.ServerVariables("HTTP_ACCEPT"))
if Instr(httpAccept,"wap") then
IsWap=1
Else
Response.Redirect "http://www.gelon.net/cgi-bin/wapalize.cgi?url=http://hikey.net/wap"
Response.End
End if
%>
把这段代码加在你WAP页的头上(最头上!)就做到了:如果浏览器不支持的话,就把它重定向到Gelon.net提供的WAP模拟器上 URL=后面的可以改成你的网站地址
就算是别人只知道你的网址,不知道你的网站该如何访问,他也可以看到效果了...
- 上一篇: 使用正则表达式实现模式图片新闻.ASP
- 下一篇: WAP版的手机号码所在地查询
-= 资 源 教 程 =-
文 章 搜 索