Опытный | Функцию пинга пингсервисов при создании дорвея. Было бы неплохо. Вот от себя добавлю: регистрация в liveinternet при создании дора
PHP код: function liveinternet($url, $name = "Домашняя страница") { global $folder; $page = "http://www.liveinternet.ru/add"; $password = "тут пароль"; // ПАРОЛЬ ДЛЯ ДОСТУПА К СТАТИСТИКЕ $email = "тут мыло"; // EMAIL $random = rand(10000000, 9999999999); $nick = str_replace('http://', '', $url); $nick = str_replace('/', '', $nick); $counter_code = "document.write(\"<a href='http://www.liveinternet.ru/click' target=_blank><img src='http://counter.yadro.ru/hit?t50.6;r\" + escape(document.referrer) + ((typeof(screen)==\"undefined\")?\"\":\";s\"+screen.width+\"*\"+screen.height+\"*\"+(screen.colorDepth?screen.colorDepth:screen.pixelDepth)) + \";u\" + escape(document.URL) + \";\" + Math.random() + \"' border=0 width=31 height=31 alt='' title='LiveInternet'><\/a>\");\n"; $fields = "random=$random&rules=agreed&type=site&nick=$nick&url=$url&name=$name&email=$email&password=$password&check=$password&keywords=&aliases=&group=&private=on&subscribe=off&www=&confirmed=";
$ch = curl_init($page); curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); curl_setopt($ch, CURLOPT_USERAGENT, "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)"); curl_setopt($ch, CURLOPT_POST, 1); curl_setopt($ch, CURLOPT_POSTFIELDS, $fields);
$response = curl_exec($ch); curl_close($ch);
$fp=fopen($folder."/counter.js", "w+"); fputs($fp, $counter_code); fclose($fp); @chmod ($folder."/counter.js", 0777);
if(strpos($response,"action=/code") === false) return "<br>Счетчик не зарегистрирован - ошибка.<br>\r\n"; else return "<br>Счетчик Liveinternet зарегистрирован.<br>\r\n"; }
это в functions.php
PHP код: echo liveinternet($way);
это в run.php после "// START" и туда же
PHP код: if (strstr($myshab, "[COUNTER]")) $myshab=str_replace("[COUNTER]", "<script src=\"counter.js\"></script>", $myshab);
в место, где обрабатываются макросы, найдете В шаблон просто вставляем [COUNTER] в футер. |