[Upcase-project-cvs] UpCase/admin newgroup.php,NONE,1.1

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

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

Added Files:
	newgroup.php 
Log Message:
group creation


--- NEW FILE: newgroup.php ---
<?php

include_once("../config/uc_config.inc");
include_once("lib/uc_page.php");
include_once("lib/uc_sql.php");

$page = new UcPage("groupCreation");
$page->open();


include("config/uc_templates.inc");
$tmpl = new ModeliXe($uc_tmpl["NEW_GROUP"]);
$tmpl->SetModeliXe();

if (!empty($newgroup))
{
	$query = sprintf($ucsql_groupadd, $newgroup);
	print($query);
	$db = new UcSql();
	$db->Execute($query) or die("Unable to create group: " .
								$db->ErrorMsg());
}

$tmpl->MxText("groupname", $newgroup);
$tmpl->MxWrite();
?>