Added page statistic tracking.

This commit is contained in:
JT Smith 2002-11-08 06:13:56 +00:00
parent 0b5d1ccc74
commit 49ccb43799
3 changed files with 21 additions and 1 deletions

View file

@ -220,6 +220,13 @@ sub page {
$operationOutput = _processOperations();
$wobjectOutput = _processFunctions();
}
if ($wobjectOutput eq "" && $operationOutput eq "" && $session{setting}{trackPageStatistics}) {
WebGUI::SQL->write("insert into pageStatistics (dateStamp, userId, username, ipAddress, userAgent, referer,
pageId, pageTitle) values (".time().",".$session{user}{userId}.",".quote($session{user}{username}).",
".quote($session{env}{REMOTE_ADDR}).", ".quote($session{env}{HTTP_USER_AGENT}).",
".quote($session{env}{HTTP_REFERER}).", ".$session{page}{pageId}.",
".quote($session{page}{title}).")");
}
if ($session{header}{mimetype} ne "text/html") {
$httpHeader = WebGUI::Session::httpHeader();
WebGUI::Session::close();

View file

@ -210,6 +210,7 @@ sub www_editMiscSettings {
$f->hidden("op","editMiscSettingsSave");
$f->yesNo("preventProxyCache",WebGUI::International::get(400),$session{setting}{preventProxyCache});
$f->yesNo("showDebug",WebGUI::International::get(707),$session{setting}{showDebug});
$f->yesNo("trackPageStatistics",WebGUI::International::get(749),$session{setting}{trackPageStatistics});
$f->submit;
$output .= $f->print;
} else {
@ -223,6 +224,7 @@ sub www_editMiscSettingsSave {
if (WebGUI::Privilege::isInGroup(3)) {
_saveSetting("preventProxyCache");
_saveSetting("showDebug");
_saveSetting("trackPageStatistics");
return www_manageSettings();
} else {
return WebGUI::Privilege::adminOnly();