| 
Сегодня: 01.11.2025 - 04:48:12
|  | Бесплатные PHP скрипты - форум техподдержки |  | | Форум техподдержки WR-Скриптов на php. Обсуждаем: основы программирования на PHP 5 - 7 версий, различные подходы к написанию скриптов на php 7 без MySQL. А также WR-скрипты: бесплатные доски объявлений, скрипты форумов, Гостевые книги, Каталог ссылок, Галерея, Фотоальбом, Счётчики, Рассылки, Анекдот и другие. Принимаются пожелания для новых версий. Сообщите какой скрипт нужен для Вашего сайта, постараемся найти или реализовать. Скачать скрипты можно бесплатно. Вместе мы сделаем бесплатные php скрипты лучше и доступнее! 
 
 | 
 |  
 Защита доски: Антифлуд| Объявление - WR-Scriptы в UTF-8 кодировке | 
|---|
 | Активно обновляю скрипты и перевожу их в UTF-8 кодировку. Список перекодированных php скриптов доступен на главной странице сайта. Скачивайте скрипты и устанавливайте на свой сайт! В ближайшее время обновлю каталог знакомств, форум Про, фотоальбом, доски объявлений лайт и ЛЮКС.
 
 На форуме, пожалуйста, пишите что модернизировать в скриптах в первую очередь. Постараюсь исправить большую часть пожеланий!
 Планирую продолжить работы весь 2023 год.
 
 | 
 | Автор | Сообщение | 
|---|
 | Александр  •
 
 
 АУчастник форума 
 | | Модуль реализован для доски v1.3 в умелых руках легко переделывается для других версий.Испытывался на доске с кол-м объявлений до 3000 штук. Время выполнения 0.033 сек.
 
 исходный код модуля:
 <?php
 $fbase = file("$datadir/$datafile");
 $cbase = count($fbase);
 $addmsg_orig = explode(" ",$msg);
 $addmsg = array_unique($addmsg_orig);
 $caddmsg = count($addmsg);
 $result = false;
 $double = 0;
 for ($fb=0; $fb<$cbase; $fb++)
 {
 $ebase = explode("|",$fbase[$fb]);
 $frub = file("$datadir/".$ebase[3].".dat");
 $crub = count($frub);
 for ($fr=0; $fr<$crub; $fr++)
 {
 $erub = explode("|",$frub[$fr]);
 $textob = $erub[5];
 $arrob_orig = explode(" ",$textob);
 $arrob = array_unique($arrob_orig);
 $carrob = count($arrob);
 $mresult = array_intersect($addmsg, $arrob);
 $cresult = count($mresult);
 if($caddmsg >= $carrob)
 {
 $koef = $carrob/$caddmsg;
 $koefres = ($cresult/$carrob)*$koef;
 }
 else
 {
 $koef = $caddmsg/$carrob;
 $koefres = ($cresult/$carrob)*$koef;
 }
 if($koefres > 0.6)
 {
 $result = true;
 $double++;
 $koefmes = substr(($koefres), 0, 4)*100;
 }
 }
 }
 ?>
 
 |  |  | 
 |  
| Сообщение # 1 | 06.05.08 - 03:28:09 |  |  |  | Александр  •
 
 
 АУчастник форума 
 | | Работает по принципу перебора всех объявлений в базе, сравнивая все существующие слова, отсекая одновременно дубли... Далее в файл add.php после первичных проверок размещаемого объявления добавляем:
 
 // АНТИФЛУД по ДУБЛЯМ размещения
 require('antiflud.php');
 
 if($result) {echo "
 Приносим свои извинения, но похожее на $koefmes% объявление ($double шт.) уже есть на этой Доске объявлений.
 Попробуйте написать объявление используя другие словосочетания";}
 
 Реализацию данного мода можно пощупать тут: http://www.mosbisnes.ru - только сильно не флудите
  
 Спамеры не така страшны, как флудеры, ибо одно и то же каждый день и в разные рубрики
  ( |  |  | 
 |  
| Сообщение # 2 | 06.05.08 - 03:35:57 |  |  |  | Степан  •
 
 
 Сгость 
 | | Как реализовать такой антифлуд на 1.5и куда вставлять
 
 // АНТИФЛУД по ДУБЛЯМ размещения
 require('antiflud.php');
 
 if($result) {echo "
 Приносим свои извинения, но похожее на $koefmes% объявление ($double шт.) уже есть на этой Доске объявлений.
 Попробуйте написать объявление используя другие словосочетания";}
 |  |  | 
 |  
| Сообщение # 3 | 18.06.09 - 14:30:24 |  |  |  | proggi  •
 
 
 PУчастник форума 
 | | Степан, тебе же написали
 Цитата:
 Непонятно????
 
 Иди учебники читай, или покупай техподдержку.
 |  |  | 
 |  
| Сообщение # 4 | 18.06.09 - 15:30:51 |  |  |  | Степан  •
 
 
 Сгость 
 | | Это я и сам знаю, я про то что в 1.5 скорей всего другие переменные, на 1.5 я пробовал, не работает |  |  | 
 |  
| Сообщение # 5 | 18.06.09 - 15:33:18 |  |  |  | Степан  •
 
 
 Сгость 
 | | Я хотел узнать, пойдет ли этот код на 1,5 я вообще то спросил, если ты не знаешь то здесь мог бы и не отписываться. |  |  | 
 |  
| Сообщение # 6 | 18.06.09 - 15:36:11 |  |  |  | Степан  •
 
 
 Сгость 
 | | Всем кому интересно для доски 1.5 код будет выглядеть след. образом:
 <?php
 $fbase = file("$datadir/$datafile");
 $cbase = count($fbase);
 $addmsg_orig = explode(" ",$msg);
 $addmsg = array_unique($addmsg_orig);
 $caddmsg = count($addmsg);
 $result = false;
 $double = 0;
 for ($fb=0; $fb<$cbase; $fb++)
 {
 $ebase = explode("|",$fbase[$fb]);
 $frub = file("$datadir/".$ebase[0].".dat");
 $crub = count($frub);
 for ($fr=0; $fr<$crub; $fr++)
 {
 $erub = explode("|",$frub[$fr]);
 $textob = $erub[5];
 $arrob_orig = explode(" ",$textob);
 $arrob = array_unique($arrob_orig);
 $carrob = count($arrob);
 $mresult = array_intersect($addmsg, $arrob);
 $cresult = count($mresult);
 if($caddmsg >= $carrob)
 {
 $koef = $carrob/$caddmsg;
 $koefres = ($cresult/$carrob)*$koef;
 }
 else
 {
 $koef = $caddmsg/$carrob;
 $koefres = ($cresult/$carrob)*$koef;
 }
 if($koefres > 0.6)
 {
 $result = true;
 $double++;
 $koefmes = substr(($koefres), 0, 4)*100;
 }
 }
 }
 ?>
 |  |  | 
 |  
| Сообщение # 7 | 22.06.09 - 08:20:56 |  |  |  | Seoanalyzer  •
 
 
 SУчастник форума 
 | | Ребят, плдскажите, а кто-нибудь ставил себе на доску kcaptcha. Помогите разобраться с кодом. |  |  | 
 |  
| Сообщение # 8 | 30.06.09 - 10:12:14 |  |  |  | Вадим  •
 
 
 Вгость 
 | | Кто знает как вышеобозначенный антифлуд приспособить для доски 1.4 Лайт, а то и вправду слишком много одинаковых объявлений идёт. Блокирую их стоп-словами и по айпишнику но с антифлудом думаю будет надёжней. |  |  | 
 |  
| Сообщение # 9 | 08.08.09 - 23:27:33 |  |  |  | Seoanalyzer  •
 
 
 SУчастник форума 
 | | Вадим, Выложи  boardbase из папки data я гляну |  |  | 
 |  
| Сообщение # 10 | 11.08.09 - 09:23:29 |  |  |  | Вадим  •
 
 
 Вгость 
 | | Seoanalyzer, так он у всех вроде одинаковый
 Код:
 | 1|R|Работа и бизнес|0| 2|Требуются|0|0|
 3|Ищу работу|0|0|
 4|Деловые контакты|0|0|
 5|Юридические услуги|0|0|
 6|Переводы текстов|0|0|
 7|Интернет-услуги|1|0|
 8|Курсы, образование|0|0|
 9|Разное|0|0|
 10|R|Транспорт|0|
 11|Легковые авто|0|0|
 12|Грузовые авто|0|0|
 13|Мототранспорт|0|0|
 14|Велотранспорт|0|0|
 15|Водный транспорт|0|0|
 16|Авторемонт и обслуживание|0|0|
 17|Разное|0|0|
 18|R|Недвижимость|0|
 19|Квартиры|0|0|
 20|Дома, дачи|0|0|
 21|Хутора, поместья|0|0|
 22|Помещения|0|0|
 23|Земля и участки|0|0|
 24|Лес|0|0|
 25|Услуги маклеров|0|0|
 26|Разное|0|0|
 27|R|Средства связи|0|
 28|Мобильные телефоны|0|0|
 29|Телефоны и факсы|0|0|
 30|Радиосвязь|0|0|
 31|GPS аппаратура|0|0|
 32|SAT|0|0|
 33|Аксессуары|0|0|
 34|Ремонт|0|0|
 35|Разное|0|0|
 36|R|Электроника|0|
 37|Комп ьютеры|0|0|
 38|Аудио|0|0|
 39|Теле, Видео, DVD|0|0|
 40|Фото и оптика|0|0|
 41|Бытовая техника|0|0|
 42|Офисная техника|0|0|
 43|Эл. инструмент|0|0|
 44|Разное|0|0|
 45|R|Хозяйство|0|
 46|Сельское хозяйство|0|0|
 47|Хозяйственные работы|0|0|
 48|Перевозка и погрузка|0|0|
 49|Строительство и ремонт|0|0|
 50|Оборудование|0|0|
 51|Сырье и материалы|0|0|
 52|Разное|0|0|
 53|R|Развлечения|0|
 54|Знакомства|0|0|
 55|Туризм|0|0|
 56|Спорт|0|0|
 57|Муз ыка, фильмы|0|0|
 58|Книги|0|0|
 59|Охота, рыбалка|0|0|
 60|Куда пойти|0|0|
 61|R|Для дома|0|
 62|Мебель|0|0|
 63|Искусство и ценности|0|0|
 64|Животные|0|0|
 65|Одежда, Обувь|0|0|
 66|Для детей|0|0|
 67|Здоровье|0|0|
 68|Разное|0|0|
 69|R|Разное|0|
 70|Требуется помощь|0|0|
 71|Поиски, Находки|0|0|
 72|Прочие мелочи|0|0|
 
 | 
 Он к антифлуду имеет какое то значение?
 |  |  | 
 |  
| Сообщение # 11 | 12.08.09 - 00:45:09 |  |  |  | Seoanalyzer  •
 
 
 SУчастник форума 
 | | Код который написан выше для 1.5 подойдет |  |  | 
 |  
| Сообщение # 12 | 13.08.09 - 13:45:37 |  |  | 
 
 |