PHP Fusion İçin İncelemelerden Alıntı Blok Kodu

On 10.25.08, In PHP Fusion Modları, by SoulSmasher

bu kodu PHP Fusion Mod Sitesinde bir üye için kodladım. kendisi rastgele seçilen bir incelemeden rastgele bir kısmı alıntı olarak göstertip oradan o incelemeye link veriyor.

kod da şu şekilde, sadece blok kodu ya da özel sayfa olarak eklemeleniz yeterli (blok kodunda taglarını silin tabi )

^?View Code PHP

<?php
//Random Article Quotes 1.0
//by SoulSmasher
//http://www.soulsmasher.net
//this php file gets random content from article and shows as quote on a text which refers to URL of an article
$char=50; //how many minimum chars will be shown
$result = dbquery(
   "SELECT ta.article_id, ta.article_subject, ta.article_article, tac.article_cat_id, tac.article_cat_access FROM ".DB_ARTICLES." ta
   INNER JOIN ".DB_ARTICLE_CATS." tac ON ta.article_cat=tac.article_cat_id
   ".(iSUPERADMIN ? "" : "WHERE ".groupaccess('article_cat_access'))." AND article_draft='0' ORDER BY rand() DESC LIMIT 1"
);
 
if(!dbrows($result)) {
openside("article not found");
echo "no article found";
closeside();
} else {
$data=dbarray($result);
$thearticle=stripslashes($data['article_article']);
$length=strlen(strip_tags($thearticle));
do {
$start=rand(0,$length);
} while(($start+$char)>$length);//we set our proper rand value here
$text=substr(strip_tags($thearticle),$start,$char); //html tags should be cleaned
openside("Random Article Quote");
echo "<a href='".BASEDIR."articles.php?article_id=".$data['article_id']."' title='".$data['article_subject']."' class='side'>$text</a>";
closeside();
}
?>