zezu

لايفوتكم لازم تعطوني ردود علشان اسويلكم محادثه الي يبي محادثه يكتب موقعه واسمه وشــــــــكرا











zezu(*21)(*21)(*21)(*21)(*21)(*21)(*21)(*21)

zezu

الكود تحت مع اضافت hotm






<?php













if (eregi("block-Sample_Block.php",$PHP_SELF)) {
Header("********: index.php");
die();
}

// The Old Communicate Block
$******* = "<a href=\"modules.php?name=XForum&file=index\"><img src=\"images/forum.gif\" border=0><br>Discussion Forum</a><br>\n";
$******* .= "<br>\n";
$******* .= "\n";
$******* .= "<a href=\"chat\" target=\"_blank\"><img src=\"images/irc.gif\" border=0><br>#auswushu chat</a><br>\n";

require("/chat/config/config.lib.php3");
require("/chat/localization/english/localized.chat.php3");
require("/chat/lib/release.lib.php3");
require("/chat/lib/database/".C_DB_TYPE.".lib.php3");
require("/chat/lib/clean.lib.php3");

$DbLink = new DB;

?>

<?php
function special_char($str,$lang,$type)
{
$tag_open = (($type == 'a' || $type == 'm') ? "<I>":"");
$tag_close = ($tag_open != "" ? "</I>":"");
return $tag_open.($lang ? htmlentities($str) : htmlspecialchars($str)).$tag_close;
}

// ** count rooms **
$DbLink->query("SELECT DISTINCT u.room FROM ".C_USR_TBL." u, ".C_MSG_TBL." m WHERE u.room = m.room AND m.type = 1");
$NbRooms = $DbLink->num_rows();
$DbLink->clean_results();

if ($NbRooms > 0)
{
// ** count users **
$DbLink->query("SELECT DISTINCT u.username, u.latin1 FROM ".C_USR_TBL." u, ".C_MSG_TBL." m WHERE u.room = m.room AND m.type = 1 ORDER BY username");
$NbUsers = $DbLink->num_rows();
$DbLink->clean_results();
}
?>

<?php

// ** Build users list **
if(isset($NbUsers) && $NbUsers > 0)
{
if($DbLink->query("SELECT DISTINCT room FROM ".C_MSG_TBL." WHERE type = 1 ORDER BY room"))
{
if($DbLink->num_rows() > 0)
{
$Users = new DB;
while(list($Other) = $DbLink->next_record())
{
if($Users->query("SELECT username, latin1, status FROM ".C_USR_TBL." WHERE room = '".addslashes($Other)."' ORDER BY username"))
{
if($Users->num_rows() > 0)
{
$******* .= "<B>".htmlspecialchars($Other)."</B><SPAN CLASS=\"small\"><BDO dir=\"${textDirection}\"></BDO>&nbsp;(".$Users->num_rows().")</SPAN><BR>";
while(list($Username,$Latin1,$status) = $Users->next_record())
{
$******* .= "-&nbsp;".special_char($Username,$Latin1,$status)."< BR>";
}
}
}
$Users->clean_results();
}
}
}

}

?>

Dr.Rae3

مساعدوه

http://AHENK.piczo.com/

هذا موقعي ابي دردشه مجانيه