ASP|检测客户端是否为手机　　　　来源 本站原创　佚名
对于WAP开发者来说,非常实用的代码.
可以判断访问者是使用手机还是使用电脑访问
从而进入不同目录.
程序代码 程序代码
<%
if instr(request.ServerVariables("HTTP_USER_AGENT"),"Mozilla")=0 then
 response.redirect "/wap" '如果客户端为手机访问,则进入/wap目录
else
 response.redirect "http://siyizhu.com" '如果客户端不是手机访问,则进入指定地址
end if
%>
 
或
<%
Response.Buffer = TRUE
Dim IsWap
httpAccept = LCase(Request.ServerVariables("HTTP_ACCEPT"))
if Instr(httpAccept,"wap") then
IsWap=1
Else Response.Redirect "/index.html" : Response.Flush : Response.End
End if
%>

关联文档