[Upcase-project-cvs] UpCase/admin userdel.php,1.1,1.2

[<jhe...@us...>]

Update of /cvsroot/upcase-project/UpCase/admin
In directory sc8-pr-cvs1:/tmp/cvs-serv15492

Modified Files:
	userdel.php 
Log Message:
implemented with account manager


Index: userdel.php
===================================================================
RCS file: /cvsroot/upcase-project/UpCase/admin/userdel.php,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** userdel.php	12 Nov 2002 17:54:00 -0000	1.1
--- userdel.php	28 Nov 2002 14:39:08 -0000	1.2
***************
*** 1,14 ****
  <?php
  include_once("../config/uc_config.inc");
! include_once("lib/uc_page.inc");
  
  $page = new UcPage("userDeletion");
  $page->open();
  
! include("config/uc_templates.inc");
! 
! $tmpl->setModeliXe();
! 
! 
! $tmpl->MxWrite();
  ?>
--- 1,17 ----
  <?php
  include_once("../config/uc_config.inc");
! include_once("uc_page.php");
! include_once("uc_utils.php");
  
  $page = new UcPage("userDeletion");
  $page->open();
  
! $userId = checkVar("uid", false)
! 	or die("No userid given");
! 	
! $accountMgr = new UcAccountManager($page->session->db);
! $user = $accountMgr->getUser('', $userId);
! $accountMgr->deleteUser($user);
! header("Location: " . $ucConfig->upcaseUrl
! 			. "/admin/userslist.php");
  ?>