<TITLE>Member administration</TITLE>
<BODY BGcolor=BLACK TEXT=WHITE ALINK=WHITE VLINK=WHITE LINK=WHITE>

<CENTER>
<FONT SIZE=5>Member Administration:</FONT><BR>
(add memeber)<BR>
<P></P>

<TABLE WIDTH=500>
<TR><TD><CENTER>
Please, select member and function you wold like to execute
</CENTER></TD></TR>
</TABLE>

<!
$color1="NAVY";
$color2="BLUE";
$color3="#99CCCC";
$color5="#2020FF";
$color4="RED";

$font1="WHITE";

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

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

if ($delete=="OK") {
   msqlQuery($sock, "DELETE FROM user_data WHERE id_us=$id_us");
   msqlQuery($sock, "DELETE FROM billing WHERE id_us=$id_us");
   }

if (msqlQuery($sock, "SELECT * FROM user_data WHERE member='2' AND id_us>0")<0) {
   echo("<CENTER><TABLE WIDTH=500 BORDER=2 BGCOLOR=\"$color4\">\n");
   echo("<TR><TD>\n<BR><CENTER>$ERRMSG</CENTER><BR>\n</TD></TR>\n</TABLE>\n");
   exit(0);
   }
$fd=msqlStoreResult();
$data=msqlFetchRow($fd);

if (#$data==0) {
   echo("<CENTER><TABLE WIDTH=400 BORDER=2 BGCOLOR=\"$color3\">\n");
   echo("<TR><TD>\n<BR><CENTER>Can not find any deleted MEMBER(s).</CENTER><BR>\n</TD></TR>\n</TABLE>\n");
   exit(0);
   }

echo("<CENTER>\n<BR>\n<P>\n<TABLE WIDTH=500>\n");

while(#$data>0) {
   echo("<TR>\n");
   echo("<TD WIDTH=100 BGCOLOR=\"$color1\"><A HREF=\"purgeuser.msql?delete=OK&id_us=$data[0]\"><CENTER>$data[1]</CENTER></A></TD>\n");
   echo("<TD WIDTH=300 BGCOLOR=\"$color2\"><FONT COLOR=\"$font1\">$data[4], $data[3]</FONT></TD>\n");
   echo("</TR>\n");
   $data=msqlFetchRow($fd);
   }

echo("</TABLE>\n");
echo("</FORM>\n");


msqlClose($sock);
>

