Форум о seo технологиях  
Друзья Форум вебмастеров
Bookmark and Share
Старый 27.05.2010, 17:03   #1
1cv7
Дорвейщик
 
Аватар для 1cv7
 
Регистрация: 22.11.2009
Сообщений: 475
18Скрипт добавления комментариев в доры на DLE

Столкнулся с такой проблемой: нагенерил доров, залил, доры вошли в индекс, стал чекать позиции и ужаснулся. После анализа понял, что ключевиков в тексте почти нет :) (ну бывает, затупил). Но доры в индексе, перезаливать жалко, могут улететь в бан. И вот в итоге родил скрипт постинга в комментарии DLE. Фишка скрипта в том, что он постит не куда попало, а именно в коммент к нужной странице. Выкладываю, может кому пригодится.

код скопировать и сохранить в файле с расширением php. Запускать на денвере.

PHP код:
ini_set("max_execution_time""0");
ignore_user_abort(0);

if (!
$_POST)
{
?>









Постер комментариев в DLE


















Хост:  *пример: byethost29.org
База:  *пример: my_database
Пользователь:  *пример: my_user
Пароль:  *пример: p@ssw0rd
Путь к файлам:  *пример: c:/user/folder/comm



Слить ключевикиПостить комментарии



 


}

if (
$_POST)
{

$db=$_POST['base'];
$path=$_POST['path'];
$host=$_POST['host'];
$user=$_POST['user'];
$pass=$_POST['pass'];

echo 
$path;
echo 
'
'
;
echo 
$db;
$sql mysql_connect($host$user$pass);
mysql_query('SET NAMES utf8'); 
mysql_query('set character_set_results utf8');

flush();
mysql_select_db($db$sql);
echo 
$db "
....................
"
;
if (
$_POST['choice']==2) {
        
$handle=opendir($path);
        while (
$file readdir($handle)){
        if (
is_file($path."/".$file)){

            
$file_text file($path."/".$file);
            
$title=trim(iconv('windows-1251','UTF-8',(str_replace('#title#','',$file_text[0])))); 
            echo 
$title.'
'
;    
            
$content=trim(iconv('windows-1251','UTF-8',$file_text[1]));
            
$result mysql_query("SELECT * FROM `dle_post` WHERE `title` = \"$title\""$sql)
                or die(
"Ошибка в запросе");
                echo 
"`title` = \"$title\"";

            
$num_rows mysql_num_rows($result);
            echo 
$num_rows.'
'
;
            
            if ((
$num_rows)>0) {
            
            while (
$row=mysql_fetch_array($result)) { 
                echo 
"ID ".$row['id']."
"

                
$id=$row['id'];
                echo 
"comm_num ".$row['comm_num']."
"

                
$comm_num=$row['comm_num']+1;
                
mysql_query("UPDATE `dle_post` SET `comm_num` = \"$comm_num\" WHERE `id`=\"$id\"",$sql);
                
mysql_query("INSERT INTO `dle_comments` (`id`, `post_id`, `text`, `approve`) VALUES(\"\", \"$id\",\"$content\", \"1\")",$sql);
                
$result_comm mysql_query("SELECT * FROM `dle_comments`"$sql);
                
$num_rows_comm  mysql_num_rows($result_comm);
                
            } 
                
flush();
            }
            
            else {
            
            }
        }
        }
mysql_close($sql);    
echo 
'Всего комментариев: '.$num_rows_comm."
"
;    
}

if (
$_POST['choice']==1) { //слить ключевики
            
flush();
            
$result mysql_query("SELECT * FROM `dle_post`"$sql)
                or die(
"Ошибка в запросе");

            
$num_rows mysql_num_rows($result);
            echo 
'Всего '.$num_rows.'
'
;
            
            if ((
$num_rows)>0) {
            
            while (
$row=mysql_fetch_array($result)) { 
                echo 
$row['title']."
"

                
flush();
                }
            }    

}

}


  
?>
Порядок работы:
0. Запускаем скрипт в браузере
1. сливаем ключевики
2. генерим из них файлы комментов (например цербером по шаблону
Цитата:
[Key]
[key.insert:[key]-[random.digit:5-7]%][text-[random.digit:7-15]][/key.insert]
, т.е. первая строка - Кей, вторая - контент)
3. Постим комменты
1cv7 вне форума  Ответить с цитированием
Старый 27.05.2010, 18:28   #2
Убийца бабочек
Дорвейщик
 
Аватар для Убийца бабочек
 
Регистрация: 14.11.2009
Адрес: web
Сообщений: 158
По умолчанию

хороший скриптец)
Убийца бабочек вне форума  Ответить с цитированием
Старый 24.06.2010, 23:58   #3
ramshaus
Полудорвейщик
 
Регистрация: 16.06.2010
Сообщений: 20
По умолчанию

надо будет попробывать, тем более цербер есть
__________________
Пульт Маулнета - лучший друг Оптимизатора
ботмастер или Xrumer
ramshaus вне форума  Ответить с цитированием
Ответ

Метки
dle, комментарии, скрипт

« Предыдущая тема | Следующая тема »

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 
Опции темы
Версия для печатиВерсия для печати
Отправить по электронной почтеОтправить по электронной почте

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


Текущее время: 17:04. Часовой пояс GMT +3.


Powered by vBulletin® Version 3.8.6
Copyright ©2000 - 2010, Jelsoft Enterprises Ltd. Перевод: zCarot
General Media Group