Herzlich willkommen im Archiv vom ABAKUS Online Marketing Forum
Du befindest Dich im Archiv vom ABAKUS Online Marketing Forum. Hier kannst Du Dich für das Forum mit den aktuellen Beiträgen registrieren.
Code: Alles auswählen
<?
$url = $_SERVER['PHP_SELF'] ;
if ($_SERVER['QUERY_STRING']!='') {$url="$url?".$_SERVER['QUERY_STRING'];}
$UserAgent =strtolower($_SERVER['HTTP_USER_AGENT']);
if (stristr($UserAgent ,"googlebot")) {$robot="Google";}
if (stristr($UserAgent ,"voilabot")) {$robot="Voila";}
if (stristr($UserAgent ,"slurp")) {$robot="Inktomi";}
if (stristr($UserAgent ,"fast")) {$robot="Fast";}
if (stristr($UserAgent ,"teoma")) {$robot="Ask Jeeves - Teoma";}
if (stristr($UserAgent ,"exabot")) {$robot="Exalead";}
if (stristr($UserAgent ,"scooter")) {$robot="Altavista";}
if (stristr($UserAgent ,"zyborg")) {$robot="Wisenut";}
if (stristr($UserAgent ,"archiver")) {$robot="Alexa";}
if (stristr($UserAgent ,"mirago")) {$robot="Mirago";}
if ($robot != "")
{
$date = date('Y-m-d H:i:s');
$host = $_SERVER['HTTP_HOST'];
$addr = $_SERVER['REMOTE_ADDR'];
$body = " ".$robot." hat am ".$date."\n folgende URL besucht ".$host.$url."\n\n remote_adress = ".$addr;
mail('Adresse@meineDomain.de',$robot.' war da',$body);
}
?>
Code: Alles auswählen
<?php
include($DOCUMENT_ROOT.'/tracker.php');
?>
Code: Alles auswählen
<?php
$suma[] = 'Googlebot';
$suma[] = 'MSN';
$suma[] = 'Scooter';
$suma[] = 'Fast';
$suma[] = 'Slurp';
$suma[] = 'Firefly';
$suma[] = 'Mirago';
$suma[] = 'Heinrich';
$suma[] = 'Ask Jeeves/Teoma';
$suma[] = 'Overture';
$suma[] = 'Grub';
if ( !$_SERVER['QUERY_STRING'] )
{
$file = "http://www.domain.tld" . $PHP_SELF;
}
else
{
$file = "http://www.domain.tld" . $PHP_SELF . "?" . $_SERVER['QUERY_STRING'];
}
$datum = date("d.m.Y");
$zeit = date("H:i:s");
$ip = getenv("REMOTE_ADDR");
$browser = getenv("HTTP_USER_AGENT");
$dir = dirname("$PHP_SELF");
$dateiname = "dateiname.txt";
for ( $i = 0; $i < count ($suma); $i++ )
{
if ( stristr($HTTP_USER_AGENT, $suma[$i]) )
{
$fp = fopen($dateiname,"a+");
fputs($fp,"$datum\t$zeit\t$ip\t$browser\t$file\n");
fclose($fp);
}
}
?>