
<!--******************************************************************
<!-- 
<!--Esta función valida la contraseña e identificación
<!--introducida por los usuarios del sistema Adrisoft 2525 [ARH]
<!-- 
<!--------------------------------------------------------------------
<!-- 
<!-- Para ubicar y mostrar la dirección del documento, podemos hacerlo
<!-- con el siguiente método:
<!-- 	 			  	alert(document.location)
<!-- 
<!--------------------------------------------------------------------
<!-- 
<!-- Con el propósito de ocultar el código a fin de evitar que los 
<!-- usuarios puedan verlo desde el explorador de Windows o Linux,
<!-- se ha creado este archivo, debido a que de esta forma, se dificulta
<!-- su acceso a usuarios con conocimientos básicos de internet.
<!-- 
<!--******************************************************************
<!-- 
<!-- La instrucción "switch" es similar a SELECT --- CASE. La opción
<!-- "default" es equivalente a la instrucción "case else".
<!-- 
<!--*****************************************************************
//-->
// Usuarios registrados
//
// Vladimir Adrianza - Adrisoft
// Dilxia Reyes - Adrisoft
// Clínica el Avila - Contraseña general
// Adolfo Blanco (Padre) - Adrisoft
// Jonathan ??? - Deploit
// Oriana Valdez - VAN-GIL
// Invitado
//
	

function validarPwr()
{
	
 		 var idusuario, pwr;
		 idusuario = document.frmIdent.txtUsuario.value;
		 pwr = document.frmIdent.txtPWR.value;
		 
		 switch (idusuario)
		 {
			   
		  	   case "adrisoft":
			   if (pwr=="2525arh9")
			   	  {
				   	  location.href="Index_Marco_Ayudas.htm";
				  }
			   else 
			   	  {
				  alert("¡ La contraseña no es válida !");
				  }
			   document.frmIdent.reset;
			   break;
			   
			   
		  	   case "clielav":
			   if (pwr=="clav2009")
			   	  {
				   	  location.href="Index_Marco_Ayudas.htm";
				  }
			   else 
			   	  {
				  alert("¡ La contraseña no es válida !");
				  }
			   document.frmIdent.reset;
			   break;

			   
			   case "vangil":
			   if (pwr=="orianavl")
			   	  {
				   	  location.href="Index_Marco_Ayudas.htm";
				  }
			   else 
			   	  {
				  alert("¡ La contraseña no es válida !");
				  }
    		   	   document.frmIdent.reset;
			   break;

	  		   
		  	   case "clubrest":
			   if (pwr=="cr720079")
			   	  {
				   	  location.href="Index_Marco_Ayudas.htm";
				  }
			   else 
			   	  {
				  alert("¡ La contraseña no es válida !");
				  }
    		   	   document.frmIdent.reset;
    	   	   	   break;


		  	   case "impalvid":
			   if (pwr=="impal009")
			   	  {
				   	  location.href="Index_Marco_Ayudas.htm";
				  }
			   else 
			   	  {
				  alert("¡ La contraseña no es válida !");
				  }
    		   	   document.frmIdent.reset;
    	   	   	   break;

		  	   case "cebraca":
			   if (pwr=="cebra009")
			   	  {
				   	  location.href="Index_Marco_Ayudas.htm";
				  }
			   else 
			   	  {
				  alert("¡ La contraseña no es válida !");
				  }
    		   	   document.frmIdent.reset;
    	   	   	   break;


		  	   case "sylvania":
			   if (pwr=="sylva009")
			   	  {
				   	  location.href="Index_Marco_Ayudas.htm";
				  }
			   else 
			   	  {
				  alert("¡ La contraseña no es válida !");
				  }
    		   	   document.frmIdent.reset;
    	   	   	   break;

		  	   case "invitado":
			   if (pwr=="invi2009")
			   	  {
				   	  location.href="Index_Marco_Ayudas.htm";
				  }
			   else 
			   	  {
				  alert("¡ La contraseña no es válida !");
				  }
    		   	   document.frmIdent.reset;
    	   	   	   break;


		  	   default:
		   	   	  alert("¡ La identificación no es válida !");
				  document.frmIdent.reset;
			   	  break;
			   	  			   
		}
}