Генератор рассылки новостей
Введите дату последней новости в предыдущей рассылке:
Можно воспользоваться "скопировать/вставит" взяв дату из предыдущей рассылки, но обязательно с сохранением формата. Если дата новости будет указана с неверно, новости будут генерироваться за два последних месяца.
Сгенерировать
Рассылка новостей сгенерирована!';
echo '
';
echo '
Посмотреть html-версию | Забрать в формате txt | Сгенерировать снова
';
$top = file("top.inc");
$top_b = '
| ';
// $enddata = "26 января 2007 г. 10:27";
$dir = opendir("$DOCUMENT_ROOT/news");
while($file = readdir($dir)) {
if (substr($file, -3) == "inc") {
$all_file .= $file."\t";
}
}
closedir($dir);
$all_file = trim($all_file);
$all_file = explode("\t", $all_file);
rsort($all_file);
$news1 = file("$DOCUMENT_ROOT/news/$all_file[0]");
rsort($news1);
$news2 = file("$DOCUMENT_ROOT/news/$all_file[1]");
rsort($news2);
$a = 1;
$news1_c = count($news1);
for ($i=0; $i<$news1_c; $i++) {
$news1[$i] = explode("\t", $news1[$i]);
if ($news1[$i][2] != "Новость удалена") {
$sod .= "".$news1[$i][2]."\n";
}
$news1[$i][0] = ' '.$news1[$i][0].' ';
$news1[$i][1] = '';
// $news1[$i][1] = ''.$news1[$i][1].' ';
$news1[$i][2] = ''.$news1[$i][2].'';
$c = count($news1[$i]);
for ($y=3; $y<$c; $y++) {
$news1[$i][$y] = ''.trim($news1[$i][$y]).' ';
}
$news1[$i] = implode("\t", $news1[$i]);
if (!eregi("Новость удалена", $news1[$i])) {
$news11 .= $news1[$i]."\t\t\t
\t\t";
$a++;
}
}
$s = $i;
$news2_c = count($news2);
for ($i=0; $i<$news2_c; $i++) {
$s++;
$news2[$i] = explode("\t", $news2[$i]);
if ($news2[$i][2] != "Новость удалена") {
$sod .= "".$news2[$i][2]."\n";
}
$news2[$i][0] = ''.$news2[$i][0].' ';
$news1[$i][1] = '';
// $news2[$i][1] = ''.$news2[$i][1].' ';
$news2[$i][2] = ''.$news2[$i][2].'';
$c = count($news2[$i]);
for ($y=3; $y<$c; $y++) {
$news2[$i][$y] = ''.trim($news2[$i][$y]).' ';
}
$news2[$i] = implode("\t", $news2[$i]);
if (!eregi("Новость удалена", $news2[$i])) {
$news22 .= $news2[$i]."\t\t\t
\t\t";
$a++;
}
}
$sod = str_replace("\n\n", "\n", $sod);
$sodfool = explode("\n", $sod);
$news .= $news11."\t".$news22;
$news = str_replace("\t\t", "\t", $news);
$news = explode("\t", $news);
$news_c = count($news);
$i = 0;
$s = 0;
while (!eregi($enddata, $news[$i]) && $i != 5000) {
if (!eregi("\nATI Radeon техподдержка\nСодержание\n
\n\n".$sd." \n
\n".$sob."\n
\nНовости\n
\n".$ns."
\n".$niz."\n |
\n