<%@ $Language=JScript /* PARA COLORES PHP */ %> <% $sql="select U.usradHabilitado,SEC.* from segUsuariosAdmin U,segAdminSecciones SEC, segAdminSeguridad SEG where U.usradUsuario='$PHP_AUTH_USER' and U.usradClave='$PHP_AUTH_PW' and U.usradID=SEG.usradID and SEG.admSecID=SEC.admSecID order by SEC.admSecOrden"; $rssec=$conn->execute($sql); if($rssec->field("usradHabilitado")=='N'){ die("Usuario bloqueado"); } while(!$rssec->eof){ $admSecID = $rssec->field("admSecID"); $admSecNombreAux = $rssec->field("admSecNombre"); //nombre de menues dinamicos $admSecNombre=$$admSecNombreAux; %> <% $rssec->movenext(); } %>

<%=$admSecNombre%> <% $sql="select ABM.*,MEN.menNombre,MEN.menNombre_IA,MEN.menEstructura,MEN.menActivo from segAdminABM ABM,segAdminSeguridadABM SEG, segUsuariosAdmin U left join MenuSite MEN on (MEN.menID=ABM.menID) where ABM.admSecID='$admSecID' and U.usradUsuario='$PHP_AUTH_USER' and U.usradClave='$PHP_AUTH_PW' and U.usradID=SEG.usradID and SEG.admABMID=ABM.admABMID order by admABMOrden"; $rsabm=$conn->execute($sql); while(!$rsabm->eof) { $admABMID = $rsabm->field(admABMID); $admABMNombreAux = $rsabm->field(admABMNombre); $admABMNombre = $$admABMNombreAux; //submenues dinamicos $admABMLink = $rsabm->field(admABMLink); $admABMLinkParam = $rsabm->field(admABMLinkParam); $admABMLinkParamJS = $rsabm->field(admABMLinkParamJS); $admABMTarget = $rsabm->field(admABMTarget); $admABMayudaID = $rsabm->field(ayudaID); $admABMIcon = $rsabm->field(admABMIcon); $admABMSeparador = $rsabm->field(admABMSeparador); $admABMTipoAux = $rsabm->field(admABMTipo); $admABMTipo = $$admABMTipoAux; //tag de tipo dinamico $menNombre = $rsabm->field(menNombre); $menNombre_IA = $rsabm->field(menNombre_IA); $menEstructura = $rsabm->field(menEstructura); $menActivo = $rsabm->field(menActivo); eval("\$admABMLink = \"$admABMLink\";"); if($admABMTipo!=""){//menu relacionado a tabla MenuSite if($idiomaAdmin=="English") { if($admABMTipo!="New" && $admABMTipo!="Add" && $admABMTipo!="Create"){ $menTitulo = $menNombre." ".$admABMTipo." (".$menEstructura.")"; } else { $menTitulo = $admABMTipo." ".$menNombre." (".$menEstructura.")"; } } else { $menTitulo = $admABMTipo." ".$menNombre_IA." (".$menEstructura.")"; } }else{//menu no relacionado $menTitulo = $admABMNombre; } //if(strchr($admABMLink,"?")) if($admABMLinkParamJS=="") {//es un link común if($admABMLinkParam==""){$separador="?";}else{$separador="&";} %> href="<%echo $admABMLink.$admABMLinkParam%><%if($admABMayudaID!=0){%><%=$separador%>ayudaID=<%=$admABMayudaID%><%}%>" target="<%=$admABMTarget%>"> <% } else {//es un window open if($admABMLinkParam==""){$separador="?";}else{$separador="&";} %> href="javascript: abrir_ventana('<%=$admABMLink%>','<%=$admABMLinkParam%><%if($admABMayudaID!=0){%><%=$separador%>ayudaID=<%=$admABMayudaID%><%}%>','<%=$admABMLinkParamJS%>');" target="<%=$admABMTarget%>"> <% } %> <%if($admABMSeparador=='S'){%> <%} $rsabm->movenext(); } %> <%if($admABMIcon){%> <%}%> <%=$menTitulo%>