:

CreaArbolVistaXml(); // Crea arbol de configuraciones?> texto="SELECT idrepositorio,nombrerepositorio,comentarios FROM repositorios WHERE idrepositorio=".$idrepositorio ; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["nombrerepositorio"].'"'; $cadenaXML.='>'; if($rs->campos["comentarios"]>" "){ $cadenaXML.='campos["comentarios"].'"'; $cadenaXML.='>'; $cadenaXML.=''; } $cadenaXML.=SubarbolXML_grupos_repositorios_ordenadores($cmd,$rs->campos["idrepositorio"]); $cadenaXML.=SubarbolXML_ImagenesDisponibles($cmd,$idrepositorio); $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); return($cadenaXML); } //------------------------------------------------------------------------------------------------------------------------------------------- function SubarbolXML_grupos_repositorios_ordenadores($cmd,$idrepositorio) { global $TbMsg; $cadenaXML=""; $gidaula=""; $rs=new Recordset; $cmd->texto="SELECT aulas.idaula,aulas.nombreaula,ordenadores. idordenador,ordenadores.nombreordenador FROM ordenadores INNER JOIN aulas ON ordenadores.idaula=aulas.idaula WHERE ordenadores.idrepositorio=".$idrepositorio." ORDER BY aulas.idaula,ordenadores.nombreordenador"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); if ($rs->numeroderegistros>0) { $cadenaXML.='EOF){ if ($gidaula!=$rs->campos["idaula"]){ if ($gidaula!="") $cadenaXML.=''; $cadenaXML.='campos["nombreaula"].'"'; $cadenaXML.='>'; $gidaula=$rs->campos["idaula"]; } // Visualiza los ordenadores de cada aula ( temporalmente desabilitado por rendimiento ) $cadenaXML.='campos["nombreordenador"].'"'; $cadenaXML.='>'; $rs->Siguiente(); } if ($gidaula!=""){ $cadenaXML.=''; $cadenaXML.=''; } $rs->Cerrar(); return($cadenaXML); } //________________________________________________________________________________________________________ function SubarbolXML_ImagenesDisponibles($cmd,$idrepositorio) { global $TbMsg; $cadenaXML=""; $cmd->texto="SELECT DISTINCT imagenes.* FROM imagenes WHERE imagenes.idrepositorio=".$idrepositorio." AND imagenes.codpar>0 ORDER by imagenes.descripcion"; $rs=new Recordset; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset if ($rs->numeroderegistros>0) { $cadenaXML.='EOF){ $cadenaXML.='campos["descripcion"].' ('.$TbMsg["IMGTYPE".$rs->campos["tipo"]].')"'; $cadenaXML.=''; $rs->Siguiente(); } if ($rs->numeroderegistros>0) { $cadenaXML.=''; } $rs->Cerrar(); return($cadenaXML); } ?>