Conexion->Cerrar();
}
if($opcion!=$op_movida){
echo '';
echo '';
echo ' ';
echo '';
echo ''.$tablanodo.'
';
echo ' ';
echo '';
echo ' ';
echo '';
}
/*________________________________________________________________________________________________________
Inserta, modifica o elimina datos en la tabla proyectores
________________________________________________________________________________________________________*/
function Gestiona(){
global $cmd;
global $opcion;
global $idproyector;
global $nombreproyector;
global $modelo;
global $tipo;
global $ip;
global $idaula;
global $op_alta;
global $op_modificacion;
global $op_eliminacion;
global $op_movida;
global $tablanodo;
global $datosduplicados;
$cmd->CreaParametro("@idaula",$idaula,1);
$cmd->CreaParametro("@idproyector",$idproyector,1);
$cmd->CreaParametro("@nombreproyector",$nombreproyector,0);
$cmd->CreaParametro("@modelo",$modelo,0);
$cmd->CreaParametro("@tipo",$tipo,0);
$cmd->CreaParametro("@ip",$ip,0);
switch($opcion){
case $op_alta :
// Comprueba que no existan duplicados
$ipduplicada='no';
$nombreduplicado='no';
$cmd->texto=<<Comando=&$cmd;
if (!$rs->Abrir()) return(0); // Error al abrir recordset
$rs->Primero();
while (!$rs->EOF){
if ( $nombreproyector == $rs->campos["nombreproyector"]) $datosduplicados ="nombre: $nombreproyector,";
if ( $ip == $rs->campos["ip"]) $datosduplicados .=" ip: $ip,";
$rs->Siguiente();
}
$rs->Cerrar();
// quitamos última coma
$datosduplicados = trim($datosduplicados, ',');
// Si no hay datos duplicados insertamos el proyector;
if ($datosduplicados == "") {
$cmd->texto = <<Ejecutar();
if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta
$idproyector=$cmd->Autonumerico();
// Insertar datos en el árbol de configuración.
$arbolXML=SubarbolXML_proyectores($idproyector,$nombreproyector);
$baseurlimg="../images/signos"; // Url de las imagenes de signo
$clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol
$arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault);
$tablanodo=$arbol->CreaArbolVistaXML();
}
break;
case $op_modificacion:
$cmd->texto=<<Ejecutar();
break;
case $op_eliminacion :
$cmd->texto=<<Ejecutar();
break;
case $op_movida :
$cmd->texto=<<Ejecutar();
break;
default:
break;
}
return($resul);
}
/*________________________________________________________________________________________________________
Crea un arbol XML para el nuevo nodo insertado
________________________________________________________________________________________________________*/
function SubarbolXML_proyectores($idproyector,$nombreproyector){
global $LITAMBITO_PROYECTORES;
$cadenaXML='