'?> '?>

> > > > > > >

'.$TbMsg[5].'
'; echo '  '.$TbMsg[6].': '.$textambito.','.$nombreambito.'  

'; ?>

texto="SELECT COUNT(*) AS numorde FROM ordenadores WHERE idaula=".$idaula; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(""); // Error al abrir recordset if(!$rs->EOF) $numorde=$rs->campos["numorde"]; $descripcion=""; $cmd->texto="SELECT COUNT(*) AS cuenta,perfileshard.descripcion,perfileshard.idperfilhard, ordenadores.idparticion FROM aulas"; $cmd->texto.=" INNER JOIN ordenadores ON aulas.idaula = ordenadores.idaula"; $cmd->texto.=" INNER JOIN perfileshard ON ordenadores.idperfilhard = perfileshard.idperfilhard"; $cmd->texto.=" WHERE (aulas.idaula = ".$idaula.") AND idparticion>0"; $cmd->texto.=" GROUP BY perfileshard.descripcion,perfileshard.idperfilhard,ordenadores.idparticion"; $cmd->texto.=" ORDER BY perfileshard.descripcion"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(""); // Error al abrir recordset if(!$rs->EOF){ if($numorde!=$rs->campos["cuenta"]){ // El numero de ordenadores del aula no coincide con los que tienen el mismo perfil hardware while (!$rs->EOF){ if($descripcion!=$rs->campos["descripcion"]){ if($descripcion!="") $tablaHtml.="

"; $tablaHtml.= 'campos["descripcion"]; $tablaHtml.= ""; $tablaHtml.= ''; $tablaHtml.= ""; } $tablaHtml.= ''; $tablaHtml.= ''; $rs->Siguiente(); } $tablaHtml.="

'; $tablaHtml.=' Perfil Hardware: '.$rs->campos["descripcion"].'

'; $tablaHtml.=PintaOrdenadores($cmd,$idaula,$rs->campos["idperfilhard"],$rs->campos["idparticion"],$rs->campos["cuenta"]); $tablaHtml.= '

'; $tablaHtml.=tabla_particiones($cmd,$idcentro,$idaula,$rs->campos["idperfilhard"],$rs->campos["idparticion"],$rs->campos["cuenta"]); $tablaHtml.= '

"; } else{ $tablaHtml.=tabla_particiones($cmd,$idcentro,$idaula,$rs->campos["idperfilhard"],$rs->campos["idparticion"],$rs->campos["cuenta"]); $tablaHtml.='campos["idparticion"].'" value="'.$cadenaip.'">'; } } echo $tablaHtml; $rs->Cerrar(); } /*________________________________________________________________________________________________________ Crea los desplegables de las imagenes disponibles para la particiones ________________________________________________________________________________________________________*/ function HTMLSELECT_Imagendis($cmd,$idcentro,$tipopart,$particion,$miso,$idimagen,$idaula,$idperfilhard,$idparticion,$cuenta){ $SelectHtml=""; $rs=new Recordset; $cmd->texto="SELECT COUNT(*) AS contador, perfilessoft.idperfilsoft, imagenes.descripcion, imagenes.idimagen,tiposos.tipopar,tiposos.nemonico FROM ordenadores"; $cmd->texto.=" INNER JOIN perfileshard ON ordenadores.idperfilhard = perfileshard.idperfilhard"; $cmd->texto.=" INNER JOIN perfileshard_perfilessoft ON perfileshard.idperfilhard = perfileshard_perfilessoft.idperfilhard"; $cmd->texto.=" INNER JOIN perfilessoft ON perfileshard_perfilessoft.idperfilsoft = perfilessoft.idperfilsoft"; $cmd->texto.=" INNER JOIN imagenes ON perfilessoft.idperfilsoft = imagenes.idperfilsoft"; $cmd->texto.=" INNER JOIN perfilessoft_softwares ON perfilessoft.idperfilsoft = perfilessoft_softwares.idperfilsoft"; $cmd->texto.=" INNER JOIN softwares ON perfilessoft_softwares.idsoftware = softwares.idsoftware"; $cmd->texto.=" INNER JOIN tiposos ON softwares.idtiposo = tiposos.idtiposo"; $cmd->texto.=" WHERE (imagenes.idcentro = ".$idcentro.") AND (ordenadores.idaula = ".$idaula.") AND (ordenadores.idperfilhard = ".$idperfilhard.") AND (ordenadores.idparticion=".$idparticion.")"; $swo=substr ($tipopart,0,1); if($swo=="H") $tipopart=substr ($tipopart,1,strlen($tipopart)-1); $sufi=""; if($miso){ $cmd->texto.=" AND (tiposos.tipopar = '".$tipopart."' OR tiposos.tipopar ='H".$tipopart."' )"; $sufi="M"; // Mismo sistema } else{ $cmd->texto.=" AND (tiposos.tipopar <> '".$tipopart."' AND tiposos.tipopar <> 'H".$tipopart."')"; $sufi="O"; // Otro sistema } $cmd->texto.=" GROUP BY perfilessoft.idperfilsoft, imagenes.descripcion, imagenes.idimagen,tiposos.tipopar,tiposos.nemonico "; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(0); // Error al abrir recordset $SelectHtml.= ''; $SelectHtml.= ' '; $rs->Primero(); while (!$rs->EOF){ if($rs->campos["contador"]==$cuenta){ if(CuestionIncrementales($cmd,$idperfilhard,$rs->campos["idperfilsoft"],$rs->campos["idimagen"])){ $SelectHtml.='campos["idperfilsoft"]."_".$rs->campos["tipopar"]."_".$rs->campos["nemonico"].'"'; if($idimagen==$rs->campos["idimagen"]) $SelectHtml.= " selected "; $SelectHtml.=">".$rs->campos["descripcion"].''; } } $rs->Siguiente(); } $SelectHtml.= ''; $rs->Cerrar(); return($SelectHtml); } /*________________________________________________________________________________________________________ Crea la tabla de ordenadores ( iconos peque�s cuando en el aula no hay uniformidad ________________________________________________________________________________________________________*/ function PintaOrdenadores($cmd,$idaula,$idperfilhard,$idparticion){ $ipidpidc=""; $rs=new Recordset; $contor=0; $maxcontor=10; $cmd->texto=" SELECT nombreordenador,ip FROM ordenadores WHERE idperfilhard=".$idperfilhard." AND idparticion=".$idparticion." AND idaula=".$idaula." ORDER BY nombreordenador"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(""); // Error al abrir recordset $tablaHtml=''; while (!$rs->EOF){ $contor++; $tablaHtml.= ''; if($contor>$maxcontor){ $contor=0; $tablaHtml.=''; } $ipidpidc.=$rs->campos["ip"].";"; $rs->Siguiente(); } $ipidpidc= substr($ipidpidc,0,strlen($ipidpidc)-1); // Quita la coma $tablaHtml.=''; $tablaHtml.= '

'.$rs->campos["nombreordenador"].'

'; $tablaHtml.=''; return($tablaHtml); } /*________________________________________________________________________________________________________ Crea la tabla de particiones ________________________________________________________________________________________________________*/ function tabla_particiones($cmd,$idcentro,$idaula,$idperfilhard,$idparticion,$cuenta){ global $TbMsg; $tablaHtml=""; $particion=""; $rs=new Recordset; $cmd->texto="SELECT particion FROM particiones WHERE idparticion=".$idparticion; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(""); // Error al abrir recordset if(!$rs->EOF) $particion=$rs->campos["particion"]; $rs->Cerrar(); $tablaHtml.= ''; $tablaHtml.= ''; $tablaHtml.= ''; $tablaHtml.= ''; $tablaHtml.= ''; $tablaHtml.= ''; $auxsplit=split(";",$particion); for($j=0;$j'.chr(13); $tablaHtml.=''.chr(13); $tablaHtml.=''; $tablaHtml.=''; $tablaHtml.=''; $tablaHtml.=''.chr(13); $idimagen=TomaImagen($cmd,$idaula,$idperfilhard,$idparticion,$particion,$cuenta); $tablaHtml.=''.chr(13); $tablaHtml.=''.chr(13); $tablaHtml.=''.chr(13); $tablaHtml.=''; $parametros="0=".chr(13); $parametros.="1=cache".chr(13); $parametros.="2=net"; $tablaHtml.= ''; $tablaHtml.=''; $tablaHtml.=''.chr(13); } $tablaHtml.='

	P	'.$TbMsg[9].'
'.$particion.'	('.$tipopart.") - ".$TbMsg[10].'	Path	('.$tipopart.") - ".$TbMsg[11].'
		'. HTMLSELECT_Imagendis($cmd,$idcentro,$tipopart,$particion,true,$idimagen,$idaula,$idperfilhard,$idparticion,$cuenta).'	'.HTMLCTESELECT($parametros, "pathrmb_".$particion.'_'.$idperfilhard.'_'.$idparticion,"estilodesple","",0,60).'	'. HTMLSELECT_Imagendis($cmd,$idcentro,$tipopart,$particion,false,$idimagen,$idaula,$idperfilhard,$idparticion,$cuenta).'

'; $tablaHtml.='
'; return($tablaHtml); } //________________________________________________________________________________________________________ // Comprueba que la imagen no tiene incrementales o si la tiene que existen para el perfil hardware del ordenador //________________________________________________________________________________________________________ function CuestionIncrementales($cmd,$idperfilhard,$idperfilsoft,$idimagen){ $wrs=new Recordset; $cmd->texto=" SELECT idsoftincremental FROM imagenes_softincremental WHERE idimagen=".$idimagen; $wrs->Comando=&$cmd; if (!$wrs->Abrir()) return(false); // Error al abrir recordset if ($wrs->numeroderegistros==0) return(true); while (!$wrs->EOF){ if(!ExisteIncremental($cmd,$idperfilhard,$idperfilsoft ,$wrs->campos["idsoftincremental"])) return(false); $wrs->Siguiente(); } return(true); } //________________________________________________________________________________________________________ // Comprueba que existe una incremental para cierta combinaci� de perfil software y perfil hardware //________________________________________________________________________________________________________ function ExisteIncremental($cmd,$idperfilhard,$idperfilsoft ,$idsoftincremental){ $rs=new Recordset; $cmd->texto="SELECT COUNT(*) as contador FROM perfileshard_perfilessoft INNER JOIN phard_psoft_softincremental ON perfileshard_perfilessoft.idphardidpsoft = phard_psoft_softincremental.idphardidpsoft WHERE (perfileshard_perfilessoft.idperfilhard = ".$idperfilhard.") AND (perfileshard_perfilessoft.idperfilsoft = ".$idperfilsoft.") AND (phard_psoft_softincremental.idsoftincremental = ".$idsoftincremental.")"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(false); // Error al abrir recordset if ($rs->campos["contador"]==0) return(false); return(true); } /*________________________________________________________________________________________________________ Recupera los datos de un aula Parametros: - cmd:Una comando ya operativo (con conexiónabierta) - ida:El identificador del aula ________________________________________________________________________________________________________*/ function toma_propiedades($cmd,$ida){ global $nombreaula; global $urlfoto; global $cagnon; global $pizarra; global $ubicacion; global $comentarios; global $ordenadores; global $puestos; $rs=new Recordset; $cmd->texto="SELECT * FROM aulas WHERE idaula=".$ida; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(false); // Error al abrir recordset $rs->Primero(); if (!$rs->EOF){ $nombreaula=$rs->campos["nombreaula"]; $urlfoto=$rs->campos["urlfoto"]; $cagnon=$rs->campos["cagnon"]; $pizarra=$rs->campos["pizarra"]; $ubicacion=$rs->campos["ubicacion"]; $comentarios=$rs->campos["comentarios"]; $puestos=$rs->campos["puestos"]; $rs->Cerrar(); $cmd->texto="SELECT count(*) as numordenadores FROM ordenadores WHERE idaula=".$ida; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(false); // Error al abrir recordset $rs->Primero(); if (!$rs->EOF) $ordenadores=$rs->campos["numordenadores"]; return(true); } else return(false); } /*________________________________________________________________________________________________________ Toma el identificador de la imagen ________________________________________________________________________________________________________*/ function TomaImagen($cmd,$idaula,$idperfilhard,$idparticion,$particion,$cuenta){ $rs=new Recordset; $cmd->texto="SELECT COUNT(*) AS contador, imagenes.idimagen FROM ordenadores INNER JOIN ordenador_imagen ON ordenadores.idordenador = ordenador_imagen.idordenador INNER JOIN imagenes ON ordenador_imagen.idimagen = imagenes.idimagen WHERE ordenadores.idperfilhard = ".$idperfilhard." AND ordenadores.idparticion = ".$idparticion." AND ordenadores.idaula =".$idaula." AND ordenador_imagen.particion = ".$particion." GROUP BY imagenes.idimagen" ; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(""); // Error al abrir recordset $idimagen=0; if(!$rs->EOF){ if($rs->campos["contador"]==$cuenta){ $idimagen=$rs->campos["idimagen"]; } } $rs->Cerrar(); return($idimagen); } ?>