?
function Browse_infor ()
{
$browser = ""; $browserver = "";
//
$browsers =array ("Lynx", "Mosaic", "AOL", "opera", "Java", "Macweb", "Webexplorer", "OmniWeb");
$agent = $globals ["Http_user_agent"];
For ($i =0 $i <=7; $i + +)//cloud-Habitat Community
{
if (Strpos ($agent, $browsers [$i])
{
$browser = $browsers [$i];
$browserver = "";
}
}
if (Ereg ("Mozilla", $agent) &&!ereg ("MSIE", $agent))//cloud-dwelling community
{
$temp =explode ("(", $agent); $part = $temp [0];
$temp =explode ("/", $part); $browserver = $temp [1];
Open source
$temp =explode ("", $browserver); $browserver = $temp [0];
$browserver =preg_replace ("/([D.] +)/"," 1 ", $browserver);
$browserver = "$browserver"; //
$browser = "Netscape Navigator";
}
if (Ereg ("Mozilla", $agent) && ereg ("opera", $agent))
{
$temp =explode ("(", $agent); $part = $temp [1];
PHP Cloud-dwelling community
$temp =explode (")", $part); $browserver = $temp [1];
$temp =explode ("", $browserver); $browserver = $temp [2];
Cloud-dwelling communities
$browserver =preg_replace ("/([D.] +)/"," 1 ", $browserver);
$browserver = "$browserver";
$browser = "Opera";
}
if (Ereg ("Mozilla", $agent) && ereg ("MSIE", $agent))
PHP Cloud-dwelling community
{
$temp = Explode ("(", $agent); $part = $temp [1];
$temp = Explode (";", $part); $part = $temp [1]; //
$temp = Explode ("", $part); $browserver = $temp [2];
$browserver =preg_replace ("/([D.] +)/"," 1 ", $browserver);
$browserver = "$browserver"; //
$browser = "Internet Explorer";
}
if ($browser!= "")
{
$browseinfo = "$browser $browserver";
}
Else
{
$browseinfo = "Unknown";
}
return $browseinfo;
}
Call Method $browser=browseinfo (), return results directly
?>
====
Get the visitor's operating system
?
function Osinfo () {
$os = "";
$agent = $globals ["Http_user_agent"];
if (eregi (' win ', $agent) && strpos ($agent, ' 95 ')) {//
$os = "Windows 95";
}
ElseIf (Eregi (' Win 9x ', $agent) && strpos ($agent, ' 4.90 ')) {
$os = "Windows Me";
}
ElseIf (' Win ', $agent) && ereg (' Eregi ', $agent)) {
Open source
$os = "Windows 98";
}
ElseIf (eregi (' win ', $agent) && eregi (' NT 5.0 ', $agent)) {
$os = "Windows 2000";
}
ElseIf (eregi (' win ', $agent) && eregi (' NT ', $agent)) {
Open source
$os = "Windows NT";
}
ElseIf (eregi (' win ', $agent) && eregi (' NT 5.1 ', $agent)) {
$os = "Windows XP";
}
ElseIf (' Win ', $agent) && ereg (' Eregi ', $agent)) {
Open source
$os = "Windows 32";
}
ElseIf (eregi (' Linux ', $agent)) {
$os = "Linux";
}
ElseIf (eregi (' Unix ', $agent)) {
$os = "Unix"; PHP Cloud-dwelling community
}
ElseIf (Eregi (' Sun ', $agent) && eregi (' OS ', $agent)) {
$os = "SunOS";
}
ElseIf (eregi (' IBM ', $agent) && eregi (' OS ', $agent)) {//
$os = "IBM OS/2";
}
ElseIf (eregi (' Mac ', $agent) && eregi (' pc ', $agent)) {
$os = "Macintosh";
}
ElseIf (eregi (' PowerPC ', $agent)) {//
$os = "PowerPC";
}
ElseIf (eregi (' Aix ', $agent)) {
$os = "Aix";
}
ElseIf (eregi (' Hpux ', $agent)) {
$os = "Hpux";
Cloud-dwelling communities
}
ElseIf (eregi (' NetBSD ', $agent)) {
$os = "NetBSD";
}
ElseIf (eregi (' BSD ', $agent)) {
$os = "BSD";
}
ElseIf (Ereg (' Osf1 ', $agent)) {
Cloud-dwelling communities
$os = "OSF1";
}
ElseIf (Ereg (' Irix ', $agent)) {
$os = "Irix";
}
ElseIf (eregi (' FreeBSD ', $agent)) {
$os = "FreeBSD";
//
}
if ($os = = ") $os =" Unknown ";
return $os;
}
Call Method $os=os_infor ();
?>