Takže ten kód:
<?
// plugin do phpRS verze 2.3.5b
// vypis poslednich kometaru
// posledni update 5.9.2003
define('IN_CODE',true); // inic. ochranne konstanty
function dej_datum($datum)
{
$dat = explode("-",$datum);
$year = $dat[0];
$month = $dat[1];
$day = $dat[2];
return (int)$day.".".(int)$month.".".substr($year,-2,2);
}
function PoslKomentare()
{
// ---[ definice zakladnich parametru ]-----------------------
$mnozstvikomentaru = 5; // pocet zobrazenych kometaru
$zobrazenychznaku = 100; // pocet znaku, ktere se zobrazi z tela komentare
$oddelovackometare = "<font color=\"#730f0f\">»</font>"; // zacatek kazdeho kometare ve vypisu bude zacinat timto retezcem
$koneckomentare = "<p>";
$stylvypisu = "novtext";
// -----------------------------------------------------------
// vypis X kometaru
$dotazkomentare = phprs_sql_query("select idk,obsah,datum,clanek,titulek from ".$GLOBALS["rspredpona"]."komentare order by datum desc limit 0,".$mnozstvikomentaru,$GLOBALS["dbspojeni"]);
$pocetkom=phprs_sql_Num_Rows($dotazkomentare);
// overeni pritomnosti kometaru
if ($pocetkom==0):
$retezec="<p align=\"center\"><b><span class='".$stylvypisu."'>Databáze je prázdná!</span></b></p>\n";
else:
// vypis komentaru
$retezec="";
for ($pom=0;$pom<$pocetkom;$pom++):
$bezpecny_kometar = strip_tags(phprs_sql_Result($dotazkomentare,$pom,'obsah'));
// odstranime html tagy
$osekany_kometar = substr($bezpecny_kometar,0,$zobrazenychznaku);
// omezime delku na nastavenou hodnotu
if (strlen($bezpecny_kometar)>strlen($osekany_kometar)):
// pokud jsme komentar zkratili, pridame ". . . "
$osekany_kometar .= " . . . ";
endif;
// pridani nazvu clanku
$cisloclanku = phprs_sql_Result($dotazkomentare,$pom,'clanek');
$komen_cla=phprs_sql_query("SELECT titulek FROM ".$GLOBALS["rspredpona"]."clanky WHERE link='$cisloclanku'",$GLOBALS["dbspojeni"]);
$komen_clapocet=phprs_sql_Num_Rows($komen_cla);
// kontrola existence clanku
if ($komen_clapocet==0):
$cltit = "?";
else:
$cltit = phprs_sql_Result($komen_cla,0,'titulek');
endif;
//
// pridani nazvu clanku
$datum = phprs_sql_Result($dotazkomentare,$pom,'datum');
$datum_odeslani=phprs_sql_query("SELECT datum FROM ".$GLOBALS["rspredpona"]."komentare WHERE datum='$datum'",$GLOBALS["dbspojeni"]);
$datum_odeslanipocet=phprs_sql_Num_Rows($datum_odeslani);
// kontrola existence clanku
if ($datum_odeslanipocet==0):
$datum_vypis = "?";
else:
$datum_vypis = phprs_sql_Result($datum_odeslani,0,'datum');
endif;
//
$link_zobrazkomentare = "'comment.php?akce=fullview&cisloclanku='".$cisloclanku."#kom".phprs_sql_result($dotazkomentare,$pom,'idk');
if (trim(phprs_sql_result($dotazkomentare,$pom,'titulek'))!="") {$titulek = phprs_sql_result($dotazkomentare,$pom,'titulek');}else{$titulek="<em>bez titulku</em>";}
// $retezec .="<span class='".$stylvypisu."'>".$oddelovackometare.$osekany_kometar." (<a href='view.php?cisloclanku=".$cisloclanku."' title=\"Zobrazit článek\">".$cltit."</a>)\n".$koneckomentare;
$retezec .="<span class='".$stylvypisu."'>".$oddelovackometare." <a href='view.php?cisloclanku=".$cisloclanku."' title=\"Zobrazit článek s komentářem\">".$osekany_kometar."</a>\n(".dej_datum($datum_vypis).")".$koneckomentare;
endfor;
endif;
// zobrazeni menu
switch ($GLOBALS["vzhledwebu"]->AktBlokTyp()):
case 1: Blok1($GLOBALS["vzhledwebu"]->AktBlokNazev(),$retezec); break;
case 2: Blok2($GLOBALS["vzhledwebu"]->AktBlokNazev(),$retezec); break;
case 3: Blok3($GLOBALS["vzhledwebu"]->AktBlokNazev(),$retezec); break;
default: Blok1($GLOBALS["vzhledwebu"]->AktBlokNazev(),$retezec); break;
endswitch;
}
?>
×××---×××
www.ava-plus44.com
www.blink-182.cz