IPCOUNT); } ibase_free_result($sth); $stmt = "SELECT COUNT(*) as IPCOUNT FROM CARDSTAT WHERE (IP not like '212.69.116.%')"; $sth = ibase_query ($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $message=$message . sprintf("Çàãðóçîê - %05d. ",$row->IPCOUNT); } ibase_free_result($sth); $message=$message . "\n---------------------------------------------\n"; /*$stmt = "SELECT CARD, COUNT(CARD) as CARDCOUNT FROM CARDSTAT WHERE (CARD<>0) and (IP not like '212.69.116.%') GROUP BY CARD ORDER BY CARD"; $sth = ibase_query ($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $message=$message . sprintf("Êàðòà %s - %05d.\n",$cards[$row->CARD],$row->CARDCOUNT); } ibase_free_result($sth); $stmt = "SELECT IP, CARD, COUNT(CARD) as CARDCOUNT, MAX(REQDATE) as REQDATE FROM CARDSTAT WHERE (IP not like '212.69.116.%') GROUP BY CARD, IP ORDER BY IP, CARD"; $sth = ibase_query ($dbh, $stmt); $last=""; while ($row = ibase_fetch_object ($sth)) { if (strcmp($last,$row->IP)!=0) $message=$message . "\n-------------------------".($row->REQDATE)."--\n"; $message=$message . sprintf("Ïîñåòèòåëü ñ IP %15s èíòåðåñîâàëñÿ êàðòîé %s (%05d ðàç).\n",$row->IP, $cards[$row->CARD], $row->CARDCOUNT); $last=$row->IP; } ibase_free_result($sth); */ if ($card>0) mail("mail@irm.ru", "ÈÍÒÅÐÍÅÒ ÊÀÐÒÛ", $message,"From: mail@irm.ru\nTo:mail@irm.ru\nReply-To: mail@irm.ru\nContent-Type: text/plain; charset=\"Windows-1251\""); ?>

ÄÎÑÒÓÏ Â ÈÍÒÅÐÍÅÒ

ÄÎÑÒÓÏ Â ÈÍÒÅÐÍÅÒ