At the top of the applet page, put this to get access to vB's varaibles -
<?php
error_reporting(E_ALL & ~E_NOTICE);
define('NO_REGISTER_GLOBALS', 1);
chdir('/home/httpd/vhosts/yourdomain.com/httpdocs/forums');
require_once('./global.php');
?>
Then add this to your applet parameter -
<param name="nick" value="<?php echo $bbuserinfo['username']; ?>">
In my vBa module -
<table align="center" border="0" cellpadding="$stylevar[cellpadding]" cellspacing="$stylevar[cellspacing]" class="tborder" width="100%">
<tr>
<td class="tcat">
<span class="smallfont">
<strong>
OPL Chatroom
</strong>
</span>
</td>
</tr>
<tr>
<td width="100%" align="center" class="$getbgrow">
<strong>
<div align="center">
<script type="text/javascript">
<!--
function popUp( url ) {
window.open( "/chat/frame.html","chatWindow",'width=730,height=600,status=no,scrollbars=no,loc ation=no,toolbar=no,resizable=yes');
}
//-->
</script>
<?
$port = 5900;
function getServerAPI( $apiCommand ) {
global $port;
$result = "";
$fp = fsockopen("localhost", $port, &$errno, &$errstr, 2);
if(!$fp) {
echo "$errstr ($errno)\n";
} else {
fputs($fp,"GET /?".$apiCommand." HTTP/1.0\n\n");
$header = true;
while(!feof($fp)) {
$line = fgets($fp,128);
if ( $header == false ) $result .= $line;
if ( trim($line) == "" ) $header = false;
}
fclose($fp);
}
return $result;
}
$userCount = getServerAPI( "api.UserCount" );
$roomList = getServerAPI( "api.RoomList" );
echo "Users conected: ".$userCount."<br>";
?>
</strong>
<form>
<input type=button value="Launch Chatroom" onclick="javascript:popUp();" style="background-color: #B0B4B9; color: #000000; font: bold 11px verdana, geneva, sans-serif">
</form>
</td>
</tr>
</table>
<br />