UC知道求一个WAP站屏蔽电脑访问的代码(asp)
来源：百度知道 编辑：UC知道 时间：2024/06/09 08:35:28
很多WAP站自带的代码不完整..有些自带的屏蔽程序不完善.像www.roboo.com在线可以访问你的WAP站
原来的屏蔽代码是这样的.
<%if dzt=1 then
browsers=Lcase(Left(Request.ServerVariables("HTTP_USER_AGENT"),4))
if browsers="oper" or browsers="winw" or browsers="wapi" or browsers="mc21" or browsers="up.b" or browsers="upg1" or browsers="upsi" or browsers="qwap" or browsers="jigs" or browsers="java" or browsers="alca" or browsers="wapj" or browsers="cdr/" or browsers="nec-" or browsers="fetc" or browsers="r380" or browsers="winw" or browsers="mozi" or browsers="mozi" or browsers="m3ga" then response.redirect"/sorr.asp?zt=1"
elseif dzt=2 then
response.redirect"/sorr.asp?zt=2"
end if
%>
原来的屏蔽代码是这样的.
<%if dzt=1 then
browsers=Lcase(Left(Request.ServerVariables("HTTP_USER_AGENT"),4))
if browsers="oper" or browsers="winw" or browsers="wapi" or browsers="mc21" or browsers="up.b" or browsers="upg1" or browsers="upsi" or browsers="qwap" or browsers="jigs" or browsers="java" or browsers="alca" or browsers="wapj" or browsers="cdr/" or browsers="nec-" or browsers="fetc" or browsers="r380" or browsers="winw" or browsers="mozi" or browsers="mozi" or browsers="m3ga" then response.redirect"/sorr.asp?zt=1"
elseif dzt=2 then
response.redirect"/sorr.asp?zt=2"
end if
%>
<%if dzt=1 then
browsers=Lcase(Left(Request.ServerVariables("HTTP_USER_AGENT"),4))
if browsers="oper" or browsers="winw" or browsers="wapi" or browsers="mc21" or browsers="up.b" or browsers="upg1" or browsers="upsi" or browsers="qwap" or browsers="jigs" or browsers="java" or browsers="alca" or browsers="wapj" or browsers="cdr/" or browsers="nec-" or browsers="fetc" or browsers="r380" or browsers="winw" or browsers="mozi" or browsers="mozi" or browsers="m3ga" then response.redirect"/sorr.asp?zt=1"
elseif dzt=2 then
response.redirect"/sorr.asp?zt=2"
end if
%>
要讲清楚你说的到底是什么啊。
要不然怎么回答啊。
大哥。