00001 <?php 00002 /* 00003 +-----------------------------------------------------------------------------+ 00004 | ILIAS open source | 00005 +-----------------------------------------------------------------------------+ 00006 | Copyright (c) 1998-2001 ILIAS open source, University of Cologne | 00007 | | 00008 | This program is free software; you can redistribute it and/or | 00009 | modify it under the terms of the GNU General Public License | 00010 | as published by the Free Software Foundation; either version 2 | 00011 | of the License, or (at your option) any later version. | 00012 | | 00013 | This program is distributed in the hope that it will be useful, | 00014 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 00015 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 00016 | GNU General Public License for more details. | 00017 | | 00018 | You should have received a copy of the GNU General Public License | 00019 | along with this program; if not, write to the Free Software | 00020 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | 00021 +-----------------------------------------------------------------------------+ 00022 */ 00023 00024 00034 require_once "./include/inc.header.php"; 00035 00036 00037 // limit access only to admins 00038 #if (!$rbacsystem->checkAccess("visible", SYSTEM_FOLDER_ID)) 00039 include_once './classes/class.ilMainMenuGUI.php'; 00040 00041 if(!ilMainMenuGUI::_checkAdministrationPermission()) 00042 { 00043 $ilias->raiseError("You are not entitled to access this page!",$ilias->error_obj->WARNING); 00044 } 00045 00046 //look if there is a file tpl.adm.html (containing a frameset) 00047 $start_template = $ilias->tplPath.$ilias->account->getPref("skin")."/tpl.adm.html"; 00048 00049 if (file_exists($start_template)) 00050 { 00051 $tpl = new ilTemplate("tpl.adm.html", false, false); 00052 $tpl->setVariable("LOCATION_STYLESHEET", ilUtil::getStyleSheetLocation()); 00053 $tpl->setVariable("REF_ID", ROOT_FOLDER_ID); 00054 $tpl->parseCurrentBlock(); 00055 $tpl->show(); 00056 } 00057 else 00058 { 00059 header("location: adm_object.php?expand=1"); 00060 exit; 00061 } 00062 ?>