Forum Webscript.Ru

Программирование => Perl => Тема начата: от 11 Ноября 2001, 06:29:29

Название: Гостевая
Отправлено: от 11 Ноября 2001, 06:29:29

Помогите пожалуйста!

Сама гостевая функционирует отлично методом POST,
хотя могу переделать в GET труда не составит.

Никак не могу сообразить по какому алгоритму гостевая разбивается на несколько страниц.
К примеру как гостевая выводит по пять сообщений на странице.

Сначала хотел делить строки, но безуспешно.
Затем всю информацию начал читать в массив, но тоже не получается.....

Заранее спасибо.

Название: Гостевая
Отправлено: cyberg от 12 Ноября 2001, 01:41:11

какой скрипт? Ты хотел название скажи......или ссылку дай

Название: Гостевая
Отправлено: от 20 Ноября 2001, 14:50:02

как сделать разбивку на странице ? *)))
вроде бы можно сделать вот так.

1) допустим, что у тебя гостевая вызывается как:
../guest.cgi?page=1
2) считываем все записи из гостевой:
open(ST, \'guest.dat\');
my @msg=;
close ST;
3) создаём ссылки для страниц:
$n=5; #кол-во записей на странице ...
$page=$query{page};
my $u=0;
for($i=0;$i<=$#msg;$i=$i+$n)
{
$u++;
if ($page ne $u){
$g=$g."$u|";}else{$g=$g."$u|";}
}
4) создаём сообщения с данной страницы:
$start=($page-1)*$n;
$end=$page*$n-1;
if ($end>$#msg){$end=$#msg;}
if ($start<=0){$start=0;}
if ($start>$#msg){$start=$#msg-9;}
$s1="";

for($i=$start;$i<=$end;$i++)
  {
    $s1=$s1."$msg[$i]\\n";
   }
5) выводим навигацию по страницам и сообщения:
print $g.$s1.$g;

вот и  всё ... *)))

http://www.flymio.com