summaryrefslogtreecommitdiffstats
path: root/admin/WebConsole/gestores/relaciones/usuarios_eliminacion.php
diff options
context:
space:
mode:
Diffstat (limited to 'admin/WebConsole/gestores/relaciones/usuarios_eliminacion.php')
-rw-r--r--admin/WebConsole/gestores/relaciones/usuarios_eliminacion.php44
1 files changed, 44 insertions, 0 deletions
diff --git a/admin/WebConsole/gestores/relaciones/usuarios_eliminacion.php b/admin/WebConsole/gestores/relaciones/usuarios_eliminacion.php
new file mode 100644
index 00000000..541cbddb
--- /dev/null
+++ b/admin/WebConsole/gestores/relaciones/usuarios_eliminacion.php
@@ -0,0 +1,44 @@
+<?
+// *************************************************************************************************************************************************
+// Aplicación WEB: ogAdmWebCon
+// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
+// Fecha Creación: Año 2009-2010
+// Fecha Última modificación: Agosto-2010
+// Nombre del fichero: usuarios_eliminacion.php
+// Descripción :
+// Elimina en cascada registros de la tabla usuarios
+// Parametros:
+// - cmd:Una comando ya operativo (con conexión abierta)
+// - identificador: El identificador por el que se eliminará el usuario
+// - nombreid: Nombre del campo identificador del registro
+// - swid: Indica 0= El identificador es tipo alfanumérico 1= EI identificador es tipo numérico ( valor por defecto) *************************************************************************************************************************************************
+function EliminaUsuarios($cmd,$identificador,$nombreid,$swid=1){
+ if (empty($identificador)) return(true);
+ if($swid==0)
+ $cmd->texto="SELECT idusuario FROM usuarios WHERE ".$nombreid."='".$identificador."'";
+ else
+ $cmd->texto='SELECT idusuario FROM usuarios WHERE '.$nombreid.'='.$identificador;
+ $rs=new Recordset;
+ $rs->Comando=&$cmd;
+ if (!$rs->Abrir()) return(false); // Error al abrir recordset
+ if ($rs->numeroderegistros==0) return(true);
+ $rs->Primero();
+ while (!$rs->EOF){
+ /*
+ $cmd->texto="DELETE FROM usuario_imagen WHERE idusuario=".$rs->campos["idusuario"];
+ $resul=$cmd->Ejecutar();
+ if (!$resul){
+ $rs->Cerrar();
+ return(false);
+ }
+ */
+ $rs->Siguiente();
+ }
+ if($swid==0)
+ $cmd->texto="DELETE FROM usuarios WHERE ".$nombreid."='".$identificador."'";
+ else
+ $cmd->texto='DELETE FROM usuarios WHERE '.$nombreid.'='.$identificador;
+ $resul=$cmd->Ejecutar();
+ return($resul);
+}
+?>