Gram
Модератор раздела
 Откуда: здешний Всего сообщений: 566 Рейтинг пользователя: 14 Репутация пользователя: 1Дата регистрации на форуме: 23 июля 2003
|
Профиль | Сообщить модератору | ИгнорироватьNEW! Сообщение отправлено: 14 октября 2004 15:13
Solarfall
Ну вот вместо того кода , что ты написал, а конкретно вместо вот этого:
if ($lastposttime) {
$lastposttime = $lastposttime + ($timedifferencevalue*3600) + ($timezone*3600);
$longdate = &longdate("$lastposttime");
$shorttime = &shorttime("$lastposttime");
$forumlastpost = qq~<font face="$font" color="$lastpostfontcolor">Дата: <b>$longdate</b> <br>Время: <b>$shorttime</b><br>Автор: <a href="$profileprog?action=show&member=$lastposterfilename" title="Информация об участнике">$lastposter</a>~;
if ($lastposter ne $inmembername) { $forumlastpost .= "<br>$newmsglink"; }
}
else { $forumlastpost = qq~<font face="$font" color="$lastpostfontcolor" >Нет</font>~; }
Напиши вот это:
my $lastpostfile = "forum$forumid/last.cgi";
my $lastpost_html_full;
if (-e $lastpostfile) {
open (LF, "<$lastpostfile");
flock (LF, 1);
my $lastdata = <LF>;
close LF;
chomp ($lastdata);
my ($last_title, $last_descr, $last_topicid, $last_forumid) = split (/\|/, $lastdata);
$last_title =~ s/(\S{20})/$1 /g;
if (length($last_title) > 25) { $last_title = substr($last_title, 0, 25)."..."; }
my $lastpicture = $imagesurl . "/images/" . "toppost.gif";
$lastpost_html_full = qq~<br><img src="$lastpicture" border="0" alt="Обновленная тема"> <a href=$threadprog?forum=$last_forumid&topic=$last_topicid#lt title="$last_descr">$last_title</a>~;
} else { undef $lastpost_html_full; }
if ($lastposttime) {
$lastposttime = $lastposttime + ($timedifferencevalue*3600) + ($timezone*3600);
$longdate = &longdate("$lastposttime");
$shorttime = &shorttime("$lastposttime");
$forumlastpost = qq~<font face="$font" color="$lastpostfontcolor">Дата: <b>$longdate</b> <br>Время: <b>$shorttime</b><br>Автор: <a href="$profileprog?action=show&member=$lastposterfilename" title="Информация об участнике">$lastposter</a>$lastpost_html_full~;
}
else { $forumlastpost = qq~<font face="$font" color="$lastpostfontcolor" >Нет</font>~; } |