CODI

<?php
$link=mysql_pconnect('','pame','pame');
if ($link){
	mysql_select_db("basepame",$link);

//Borrando los registros de las conexiones inactivas ( 20 minutos ) 
	//Los usuarios cuando salen de una sesion lo hacen generalmente de forma inadecuada
	//Como elemento de seguridad si una conexion queda inactiva durante 20 minutos o mas el usuario sera expulsado de la intranet
	$limite = (time())-20*60;
	$sql="DELETE FROM conexion WHERE fecha <".$limite;
	mysql_query($sql,$link);

//Comprobamos si el usuario esta dado de alta en la base de datos. Inicializamos las variables del entorno y optimizamos las tablas
	$sql="SELECT * FROM usuarios WHERE nombre='$nombre' and clave='$clave'";
	$result=mysql_query($sql,$link);
	if (mysql_num_rows($result)!=0){ //Si el usuario esta dado de alta
		$row=mysql_fetch_row($result);
		$id=$row[0];
		$usuario=$row[1];
		$conexiones=$row[3]+1;
		session_start();
		$_SESSION['acceso']='SI';
		$_SESSION['usuario']=$row[4];
		$_SESSION['cargo']=$row[7];
		$_SESSION['userfoto']=$row[5];
		$_SESSION['uservideo']=$row[6];
		$_SESSION['mensaje']="inicio";
		$sql2="UPDATE usuarios SET contador='$conexiones' WHERE id='$id'";
		$result=mysql_query($sql2);

//Eliminando cualquier archivo existente en la carpeta revista/pre 
		$sql="SELECT idnavegar FROM conexion";
		$result=mysql_query($sql,$link);
		if (mysql_num_rows($result)!=0) { //Si alguien esta en la intranet no eliminaremos los archivos ni limpiaremos la tabla 
			$directorio ="revista/pre/";
			$dir = opendir($directorio);
			$file = readdir($dir);
			$file = readdir($dir);
			while ($file = readdir($dir)){
				$upfile=$directorio.$file;
				unlink ($upfile);
			}
			closedir($dir);
			//Eliminamos todos los registros de la tabla articulopre y la tabla datospre
			$sql="TRUNCATE TABLE articulopre";
			mysql_db_query("basepame",$sql,$link);
			$sql="TRUNCATE TABLE datospre";
			mysql_db_query("basepame",$sql,$link);		
		}	
		//Optimizamos las tablas de la base de datos basepame
		$tablas = "SHOW TABLES"; 
		$tablas = mysql_db_query("basepame", $tablas, $link); 
		while ($tabla=mysql_fetch_array($tablas)) { 
    		$optimizar = "OPTIMIZE TABLE ".$tabla[0]; 
    		mysql_db_query("basepame", $optimizar, $link); 
		} 
		header("Location:personal.php?opersonal=missatges");
	} else header("Location:intranet.php");
	mysql_free_result($result);
} else header("Location:intranet.php");
?>