Размер файла: 4.19Kb
<? php if ( $topic > 0 ) include ( $rootpath . "messages.php" ); if ( $paget < 1 ) $paget = 1 ; $pt = "" ; if ( $paget > 1 ) $pt = "-" . $paget ; $q = mysql ( DBName , "SELECT `text` FROM `$table` WHERE 1 AND `l1` = $razdel AND `l2` = 0 AND `l3` = 0 LIMIT 0, 1" ); $s = mysql_num_rows ( $q ); print '<card id="forum" title="' . $title . 'Форум">' ; if (! $autorize ) print '<do name="a" type="options" label="Войти"><go href="' . $forum . '/a//////&z=' . $back_addr . '"/></do>' ; if (( $status >= 0 ) && $autorize && ( $s > 0 )) print '<do name="n" type="options" label="Новая тема"><go href="' . $forum . '/nt/' . $razdel . '"/></do>' ; print '<do name="r" type="options" label="Разделы"><go href="' . $forum . '"/></do>' ; print $mainkey ; print '<p>' ; print $sysmsg ; if ( $s < 1 ) { print '<br/><small>[Раздел РЅРµ найден<!--T-->]</small><br/>' ; } else { if (( $status >= 0 ) && $autorize ) print '++<a href="' . $forum . '/nt/' . $razdel . '">Новая тема</a><br/>' ; $f = mysql_fetch_array ( $q ); $text = cyr2utf ( str_replace ( "$" , "$$" , htmlspecialchars ( $f [ 'text' ]))); print '[' . $text . ']' ; //Загружаем весь список сообщений в нужном порядке. //$messagelimit $prnt = "" ; $nxt = false ; $cpage = 0 ; $q = @mysql ( DBName , "SELECT `l2` , `status` , `fixed` , `login` , `time` , `text` FROM `$table` WHERE 1 AND `status` < 2 AND `l1` = $razdel AND `l2` != 0 AND `l3` = 0 ORDER BY `fixed` DESC, `time` DESC" ); $s = @mysql_num_rows ( $q )+ 0 ; if ( $s < 1 ) { if ( $paget == 1 ) $prnt .= '<br/><small>Раздел РїСѓСЃС‚</small><br/>' ; if ( $paget > 1 ) $prnt .= '<br/><small>РќР° данной странице нет тем</small><br/>' ; } else { $prntt = "" ; if ( $paget > 2 ) $prntt .= '<br/><<=<a href="' . $forum . '/show/' . $razdel . '" accesskey="4">Р’ начало</a>' ; if ( $paget < 9999 ) { if ( $paget > 1 ) $prntt .= '<br/><=<a href="' . $forum . '/show/' . $razdel . '-' .( $paget - 1 ). '" accesskey="1">Предыдущие</a><br/>' ;} else { if ( $paget > 1 ) $prntt .= '<br/><=<a href="' . $forum . '/show/' . $razdel . '-(((BACKPAGE)))" accesskey="1">Предыдущие</a><br/>' ;} $curpageprint = "" ; for ( $i = 0 ;( $i < $s ); $i ++) { $f = mysql_fetch_array ( $q ); $text = cyr2utf ( str_replace ( "$" , "$$" , htmlspecialchars ( $f [ 'text' ]))); $time = $f [ 'time' ]; $flogin = $f [ 'login' ]; $l2 = $f [ 'l2' ]; $q1 = @mysql ( DBName , "SELECT `time` FROM `$table` WHERE 1 AND `l1` = $razdel AND `l2` = $l2 AND `l3` = 1" ); $f1 = mysql_fetch_array ( $q1 ); $time = $f1 [ 'time' ]; $q1 = @mysql ( DBName , "SELECT `fixed` , `status` FROM `$table` WHERE 1 AND `status` < 2 AND `l1` = $razdel AND `l2` = $l2 AND `l3` != 0" ); $countermsg = @mysql_num_rows ( $q1 )+ 0 ; $nikname = $flogin ; if ( $nikname == 'begemot.kmx.ru' ) $nikname = cyr2utf ( 'Алексей' ); if ( $nikname == 'dimon.kmx.ru' ) $nikname = cyr2utf ( 'Дмитрий' ); $closeflag = "" ; $fixedflag = "" ; if ( $f [ 'status' ]== 1 ) $closeflag = "#" ; if ( $f [ 'fixed' ]== 1 ) $fixedflag = "!" ; $curmes = '<br/>><a href="' . $forum . '/show/' . $razdel . $pt . '/' . $l2 . '">' . $nikname . ' ' . date ( "j.m.y G:i" , $time ). ' [' . $countermsg . ']' . $closeflag . $fixedflag . '</a><br/>' . $text . '<br/>' ; if (( strlen ( $curpageprint . $curmes )+ 500 )> $maxsize ) { $cpage ++; if ( $cpage == $paget ) { $tonext = true ; $endprnt = $curpageprint ;} if ( $cpage ==( $paget + 1 )) { $toend = true ; break ;} else { $curpageprint = $curmes ;} } else $curpageprint .= $curmes ; } if (! $tonext ) $prntt .= $curpageprint ; else $prntt .= $endprnt ; $prnt .= str_replace ( "(((BACKPAGE)))" , $cpage , $prntt ); } print $prnt ; if ( $tonext ) print '<br/>=><a href="' . $forum . '/show/' . $razdel . '-' .( $paget + 1 ). '" accesskey="3">Следующие</a>' ; if ( $toend ) print '<br/>=>><a href="' . $forum . '/show/' . $razdel . '-9999" accesskey="6">Р’ конец</a>' ; if ( $toend || $tonext ) print '<br/>' ; if (( $status >= 0 ) && $autorize ) print '<br/>++<a href="' . $forum . '/nt/' . $razdel . $pt . '" accesskey="2">Новая тема</a>' ; } print '<br/><<a href="' . $forum . '" accesskey="7">Разделы</a>' ; print $endtext ; exit (); ?>