171 похожих чатов

<?Php If ($modx->event->name != 'OnLoadWebDocument') { return; } // получим ресурс $resource =

$modx->resource;
// URL
$url = $modx->makeUrl($resource->get('id'), '', '', 'abs');
// id TV views
$tvViewsId = 83;
// количество просмотров
$views = 0;

// если TV не доступна для этого шаблона, то завершаем
$tvViewsTemplate = $modx->getObject('modTemplateVarTemplate', [
'tmplvarid' => $tvViewsId,
'templateid' => $resource->get('template')
]);
if (!$tvViewsTemplate) {
return;
}

// получаем TV
$tvViews = $modx->getObject('modTemplateVarResource', [
'tmplvarid' => $tvViewsId,
'contentid' => $resource->get('id')
]);

// если имеется TV то получаем его значение, иначе создаем
if ($tvViews) {
$views = $tvViews->get('value');
} else {
$tvViews = $modx->newObject('modTemplateVarResource');
// устанавливаем значение поля tmplvarid
$tvViews->set('tmplvarid', $tvViewsId);
// устанавливаем значение поля contentid
$tvViews->set('contentid', $resource->get('id'));
}

// если значение куки не равно текущему URL, то увеличиваем счетчик
if ($_COOKIE['views'] != $url) {
// устанавливаем количество просмотров
$tvViews->set('value', ++$views);
// сохраняем TV
$tvViews->save();
// устанавливаем COOKIE views
setcookie('views', $url, time() + (86400 * 365), $url);
}

// устанавливаем плейсхолдер views
$modx->setPlaceholder('views', $views);

2 ответов

13 просмотров

Помечайте пожалуйста код специальным оформлением monospace (Выделил текст и выбрал форматирование). Уважайте глаза тех, кто читает

Похожие вопросы

Обсуждают сегодня

Какой-то там пердун в 90-х решил, что есть какая-то разная типизация. Кого вообще это волнует?
КТ315
49
void terminal_scroll() { memmove(terminal_buffer, terminal_buffer + VGA_WIDTH, buffer_size - VGA_WIDTH); memset(terminal_buffer + buffer_size - VGA_WIDTH, 0, VGA_WIDTH); ...
Егор
47
Всем привет! Подскажите, пожалуйста, в чем ошибка? Настраиваю подключение к MySQL. Либы лежат рядом с exe. Все как по "учебнику"
Евгений
16
А можете как-то проверить меня по знаниям по ассемблеру?
A A
132
Здравствуйте! У меня появилась возможность купить книгу "Изучай Haskell во имя добра!". Но я где-то слышал, что эта книга устарела. Насколько это правда??
E
22
Здравствуйте! Я вот на stepic решаю задачи на хаскеле https://stepik.org/lesson/8443/step/8?unit=1578 мой код import Data.List (isInfixOf) removing :: String -> [String] ->...
E
10
Камрады, кто тесно работал с vtv, хотел уточнить. Ширина column задаётся жёстко на этапе создания дерева или можно в рантайме ее менять программно (не мышкой)?
Ed Doc
10
да ладно ... что там неочевидного ? глянуть в исх-ки датасета и/или кверика чтобы понять в каком месте и как выполняется обращения к св-вам blablaSQL - минутное дело, даже е...
Сергей
7
Здесь для arm кто-нибудь кодит ?
Nothing
52
Всем привет, у меня есть сервер принимающий входящие HTTP подключения, как проверить, что подключение было через прокси или нет, есть какие то поля в заголовках по которым мо...
Кибер Бомж
8
Карта сайта