php語(yǔ)言：
<?php
$Agent = $_SERVER["HTTP_USER_AGENT"];
$weizhi = strpos($Agent, 'Linux');
if ($weizhi>0)
echo "您使用的是手機(jī)瀏覽器";
else
echo "您使用的是電腦瀏覽器";
?>
asp語(yǔ)言：
<%
dim a,Agent,weizhi
Agent=Request.ServerVariables("HTTP_USER_AGENT")
weizhi=InStr(1,Agent,"Linux",compare=1)
if weizhi=0 then
a="您使用的是電腦瀏覽器"
else
a="您使用的是手機(jī)瀏覽器"
End If
%>
<%=a%>
|
