if ($slovo!=="")
{
$filesl=fopen("data.dat", "w");
fwrite($filesl, $slovo);
fclose($filesl);
$filsl=file("data.dat");
$countsl=count($filsl);
for($i=0; $i<=$countsl; $i++)
{$slovo=$filsl[$i];
$file = "main.txt"; // состав фала: 0-4 строку $slovo.htm
$data=file($file);
$newfile=fopen("$slovo.htm","w");
fwrite($newfile,$data[0]);
fwrite($newfile,$slovo);
fwrite($newfile,$data[1]); // Пишем meta keywords
fwrite($newfile,$slovo);
fwrite($newfile,$data[2]); // Пишем meta description
fwrite($newfile,$slovo);
fwrite($newfile,$data[3]); // пишем левое меню до
for($i=1; $i<=$kolvo; $i++)
{fwrite($newfile,$slovo);}
fwrite($newfile,$data[4]); // Пишем окончания файла слов
fclose($newfile);
// Создаем фаил ссылающийся на слова
$str="1";
$file=file("1.htm");
$count=count($file);
$newfile=fopen("1.htm", "w");
$verx=$count-76;
for($i=0; $i<=$verx; $i++)
{
fwrite($newfile, "$file[$i]");
}
$dat = ("$slovo
\\n");
fwrite($newfile,$dat);
$ver=$verx+1;
for($i=$ver; $i<=$count; $i++)
{
@fwrite($newfile, "$file[$i]");
}
fclose($newfile);
}}
?>
Просмотр сообщений