自动识别电脑与手机并进入相应页面
把以下代码保存为一个asp文件,如默认首页文件index.asp,
<%
Response.Buffer = TRUE
httpAccept = LCase(Request.ServerVariables("HTTP_ACCEPT"))
if Instr(httpAccept,"wap") then
Response.Redirect "/wap/index.asp" ‘WAP页面路径
else Response.Redirect "default.asp" ‘WEB页面
End if %>