自动识别WAP或WEB客户端浏览器并转入相应页面源码

来源：原创更新时间：2022-10-06 12:55:55 编辑：管理员浏览：2121

ASP版

<%  
Option Explicit 
dim enterurl 
if instr(Request.ServerVariables("http_accept"),"wap")>0  then 
    enterurl="http://www.xjgqxx.com/wap/index.php"  '网站WAP地址 
     
else 
    enterurl="http://www.xjgqxx.com/"      '网站WEB地址 
     
end if 
Response.Redirect(enterurl) 
%>

PHP版本的

<?php 

 $iswap =  $_SERVER['HTTP_ACCEPT'];  
if(strpos( $iswap,"wap")>0) 
{ 
   header("location:http://www.xjgqxx.com/wap/index.php"); 
} 
else  
{ 
   header("location:http://www.xjgqxx.com/");   
} 
?>