Tengo un problema que no he podido resolver.
Resulta que en una aplicación escolar, debo permitir a mis usuarios acceso solo a aquellas opciones a las que tienen autorización en la tabla Usuario de mi base de datos.
Son ocho opciones y los campos de autorización son aut01..aut08.
Si el campo = 1 está autorizada la opción.
Si el campo = 0 no está autorizada la opción.
La presentación de las opciones la tengo en una table y me he topado que para estos elementos no funciona el atributo 'disabled'.
¿De qué otra forma lo pudiera hacer?
Si alguien tiene una idea, se lo voy a agradecer mucho.
Aquí va parte del código.
Using perl Syntax Highlighting
- my $sth = $con->prepare("SELECT aut01,aut02,aut03,aut04,aut05,aut06,aut07,aut08 FROM usuario where usuario = '$userid' and password = '$pw' ") or die "No puedo leer en la base de datos...";
- $sth->execute();
- my @doc = $sth->fetchrow_array;
- $session->param('Aut01',$doc[0]);
- $session->param('Aut02',$doc[1]);
- $session->param('Aut03',$doc[2]);
- $session->param('Aut04',$doc[3]);
- $session->param('Aut05',$doc[4]);
- $session->param('Aut06',$doc[5]);
- $session->param('Aut07',$doc[6]);
- $session->param('Aut08',$doc[7]);
- $session->param('user',$userid);
- print "<B>Bienvenida(o) $name" . "</B><BR>";
- print "<table border='4' align='center'>";
- printf ("<tr><td><a href=\"modinscs.pl?%s=%s\">1.-Modulo de Inscripciones<img src='insc02.jpg' border='0' name='banner'></a></td>", $session->name, $session->id);
- printf ("<td><a href=\"modpagos.pl?%s=%s\">2.-Modulo de Pagos<img src='pagos01.jpg' border='0' name='banner'></a></td></tr>", $session->name, $session->id);
- printf ("<tr><td><a href=\"modbecas.pl?%s=%s\">3.-Modulo de Becas<img src='becas04.jpg' border='0' name='banner'></a></td>", $session->name, $session->id);
- printf ("<td><a href=\"modinventarios.pl?%s=%s\">4.-Modulo de Inventarios<img src='inv01.jpg' border='0' name='banner'></a></td></tr>", $session->name, $session->id);
- printf ("<tr><td><a href=\"modrembolsos.pl?%s=%s\">5.-Modulo de Reembolsos<img src='reemb01.jpg' border='0' name='banner'></a></td>", $session->name, $session->id);
- printf ("<td><a href=\"modcalificaciones.pl?%s=%s\">6.-Modulo de Calificaciones<img src='calif04.jpg' border='0' name='banner'></a></td></tr>", $session->name, $session->id);
- printf ("<tr><td><a href=\"security.pl?%s=%s\">7.-Seguridad<img src='Fotos13122007028.jpg' border='0' name='banner'> </a></td>", $session->name, $session->id);
- printf ("<td><a href=\"cajahorro.pl?%s=%s\">8.-Empleados y Caja de Ahorros<img src='ahorro01.jpg' border='0' name='banner'> </a></td></tr>", $session->name, $session->id);
- print "</table>\n";
- printf ("<a href=\"closes.pl?%s=%s\">Cerrando Sesion<img src='Fotos13122007001.jpg' border='0' name='banner'></a>", $session->name, $session->id
Coloreado en 0.007 segundos, usando GeSHi 1.0.8.4
Gracias.
Negrazo
