Ошибка: Failed to parse the Currency Converter XML document.
$21 108.22


Ошибка: Failed to parse the Currency Converter XML document.
$12 054.94


Ошибка: Failed to parse the Currency Converter XML document.
$2 215.85


Скрипт показа баннеров на PHP4

Скрипты показа баннеров, изложенные в этой статье довольно элементарны.

Описания баннеров, количество кликов и показов хранится в текстовом файле, поэтому наличия mysql не требуется.

Для начала создадим файл, в котором будем хранить всю информацию.

Назовем его database.txt. Файл будет содержать записи следующего формата:
url1|img1|name1|wh1|show1|cl1
url2|img2|name2|wh2|show2|cl2
...

Где эти мистические слова означают следующее:
url — ссылка баннера, куда будет переходить пользователь по клику;
img — имя файла изображения, которое будет выводится на экран;

name — alt-текст изображения;
wh — строка вида width=xx height=xx, ширина и высота изображения; если
все изображения одного размера, соответственно можно упростить скрипт;
show — показы баннера, пишем изначально 0;
cl — клики по баннеру, пишем тоже 0;
Разделим логику на два файла. Один файл будет отвечать за показ баннера, назовем
его banner_show.php, другой — за учет кликов по баннеру, назовем его banner_click.php. Пишем baner_show...

Сначала надо загрузить файл, в котором хранится описание баннеров:

<?
$array_bann = file («database.txt»);
Потом — инициализируем генератор псевдослучайных чисел, выбираем случайную запись
из считанного файла, разделяем ее на элементы через признак «|» и заносим их в массив $data_bann.
srand((double)microtime()*1000000);
$pos = rand(0,sizeof($array_bann) — 1);
$data_bann=explode («|», $array_bann[$pos]);
Далее выводим на экран собственно сам баннер на основе данных из массива $data_bann;
echo «»;
Увеличиваем счетчик показов баннера на единицу.
$data_bann[4]++;
Склеиваем измененную запись и записываем весь массив в файл;
$array_bann[$pos]=join(«|»,$data_bann);
$fp= fopen («database.txt»,«w»);
flock($fp,3);
fwrite ($fp, join(«»,$array_bann));
fclose ($fp);
?>
Теперь займемся файлом banner_click.php. Открываем файл с данными.
<?
$array_bann = file («database.txt»);
В переменной $banner — у нас уже переданный из html-файла номер баннера, по которому кликнули.

Берем запись, соответствующую этому номеру, опять разделяем ее на кусочки через «|» и заносим это в массив $data_bann.
$data_bann=explode («|», $array_bann[$banner]);
Увеличиваем счетчик показов на единицу, склеиваем запись обратно в $array_bann.
$data_bann[5]=$data_bann[5]+1;
$array_bann[$banner]=join(«|»,$data_bann).«n»;
И записываем изменненный массив в файл database.txt.
$fp= fopen («database.txt»,«w»);
flock($fp,3);
fwrite ($fp, join(«»,$array_bann));
fclose ($fp);
Отфутболиваем пользователя по адресу, хранящемуся в переменной $data_bann[0];
header(«location: http://$data_bann[0]»);
?>
В заключение хочется добавить, что от накрутки кликов можно некоторым образом защититься,
используя запись cookie в одном скрипте и считывание их в другом.

 

Интересное

Переустановка Windows за...
<img src=«http://i-faq.ru/uploads/posts/2007-09/1189770008_1180901603_834d62a53d8f4ee88b7ff5f6dcf97.gif» align=«left» style=«border: none;» alt=«Переустановка Windows за 10 минут» />Даже у...
Подробнее...
Про Хакеров
«Уважаемый г-н Иванов! Коpпоpация Microsoft пpоводит беспpецедентную акцию и пpедлагает Вам участие в пpогpамме »Лицензия-Плюс«. Суть пpогpаммы заключается в том, что мы пеpеводим на Ваш...
Подробнее...
Средства Delphi 7 для...
Рассмотрим наборы компонентов, которые присутствуют в библиотеке компонентов delphi 7, предназначенных для работы с базами данных. Вы узнаете, что такое набор данных, источник данных и...
Подробнее...
Цветной экран смерти
Если ты кодил под Ring 0, то знаешь, что за показ экрана смерти ответственны функции ядра KeBugCheck и KeBugCheckEx.Правда, это реализовано немного по-разному в Windows 2000 и ниже и в Windows XP...
Подробнее...
10 способов проверки среды...
Служба Каталогов (Active Directory Services) — действующий стандарт для инициализации учётных записей, базового системного управления и DNS-идентификации в большинстве сред. Ведение отчётности...
Подробнее...
Что нового в SQL Server...
Наконец-то процесс создания SQL Server 2005 завершен. Если вы на протяжении долгого времени следили за подготовкой новой версии SQL, устанавливали и использовали бета-версии, с пристрастием...
Подробнее...
Domain Name Service -...
Служба Доменных Имен предназначена для того, чтобы машины, работающие в Internet, могли по доменному имени узнать IP-адрес нужной им машины, а также некоторую другую информацию; а по IP-номеру...
Подробнее...
Звук в Linux
Под звуковой подсистемой понимается инфраструктура операционной системы, отвечающая за работу установленных в компьютере устройств для обработки звуки, а именно звуковых карт, а также различных...
Подробнее...
Рекламное ПО и трояны...
Трояны составили 26.65% от общего числа заражений, обнаруженных в июле ActiveScan – бесплатным онлайновым сканером от Panda Security. Принимая во внимание процент инфекций, вызванных рекламными...
Подробнее...
Система X Window
Система X Window представляет собой графическую оболочку для операционных систем семейства Unix.Топологически X Window состоит из двух частей: это Х-сервер и Х-клиент.Х-сервер — это программа...
Подробнее...