<TITLE>DI user administration</TITLE>
<BODY BGcolor="BLACK" TEXT=WHITE ALINK=WHITE VLINK=WHITE LINK=WHITE>

<CENTER>
<FONT SIZE=5>AR members:</FONT><BR>
<P></P>

<!
$sock=msqlConnect();
if ($sock<0) {
   echo("<CENTER><TABLE WIDTH=400 BORDER=2 BGCOLOR=RED>\n");
   echo("<TR><TD>\n<BR><CENTER>$ERRMSG</CENTER><BR>\n</TD></TR>\n</TABLE>\n");
   exit(0);
   }

if (msqlSelectDB($sock, "DI")<0) {
   echo("<CENTER><TABLE WIDTH=400 BORDER=2 BGCOLOR=RED>\n");
   echo("<TR><TD>\n<BR><CENTER>$ERRMSG</CENTER><BR>\n</TD></TR>\n</TABLE>\n");
   exit(0);
   }

if (msqlQuery($sock, "SELECT nmbr, user, title, name, surname FROM dis_users WHERE clan='1' ORDER BY nmbr")<0) {
   echo("<CENTER><TABLE WIDTH=400 BORDER=2 BGCOLOR=RED>\n");
   echo("<TR><TD>\n<BR><CENTER>$ERRMSG</CENTER><BR>\n</TD></TR>\n</TABLE>\n");
   exit(0);
   }

$fd=msqlStoreResult();
$data=msqlFetchRow($fd);

$tbl=0;
if (#$data>0) {
   echo("<TABLE WIDTH=400>\n");
   $tbl=1;
   }

while(#$data>0) {
   echo("<TR><TD><A HREF=\"presentation.msql?nmbr=$data[0]\">$data[4] $data[3] ($data[1])</A></TD></TR>\n");
   $data=msqlFetchRow($fd);
   }
msqlFreeResult($fd);

if ($tbl==1) {
   echo("</TABLE>\n");
   }
else {
   $greska="Sorry, no members found!";
   echo("<P><CENTER><TABLE WIDTH=400 BORDER=2 BGCOLOR=RED>\n");
   echo("<TR><TD>\n<BR><CENTER>$greska</CENTER><BR>\n</TD></TR>\n</TABLE>\n");
   exit(0);   
   }

>
