isNS4 = (document.layers) ? true : false;
isIE4 = (document.all && !document.getElementById) ? true : false;
isIE5 = (document.all && document.getElementById) ? true : false;
isNS6 = (!document.all && document.getElementById) ? true : false;

function cambiar(objeto,color){
		if (isNS6 || isIE5) {
		    elm = document.getElementById(objeto);
			elm.style.background=color;
		}
}// fin funcion cambiar

function ver_noticia(not_id){
			window.open("ver_noticia.php?not_id="+not_id,"noticia","toolbar=0,resizable=1,scrollbars=1,width=500,height=540,left=0,top=0");
}

function checkEnter(event,form)	{ 	
	var code = 0;
	if (isNS4){
		code = event.which;
	}else{
		code = event.keyCode;
	}
		
	if (code==13){
		eval('document.'+form).submit();
	}	
}

function no_vacio(a,b){
	cad ='document.formulario.'+a+'.value';
	lon  =cad+'.length';
	if ((eval(lon))<=1){
			return ' **Ingrese un valor valido [Registro '+b+'] ** ';	
	}else{
			return '';		
	}
}	
function esp_vacios(a,b){
	cad ='document.formulario.'+a+'.value';
	lon  =eval(cad);
	
		if(lon.indexOf(" ")!=-1){
				return ' **Ingrese un valor sin espacios en blanco [Registro '+b+'] ** ';	
		}else{
				return '';		
		}
}	

function selec(a,b){
	cad ='document.formulario.'+a+'.selectedIndex';
	if ((eval(cad))==0){
		return ' **Seleccion no valida, debe seleccionar una opcion [Registro '+b+']** ';  	
	}else{
		return "";		
	}	
}

function selec2(a,b){
	cad ='document.formulario.'+a+'.length';
	if ((eval(cad))==0){
		return ' **Seleccion no valida, debe seleccionar una opcion [Registro '+b+']** ';  	
	}else{
		return "";		
	}	
}
function mail(a,b){
	cad ='document.formulario.'+a+'.value';
	existe1 = cad+'.indexOf(".")';
	existe2 = cad+'.indexOf("@")';
	if ( ((eval(existe1))==-1 || eval(existe2)==-1) && eval(cad)!=''){
		return ' **Ingrese un e-Mail valido [Registro '+b+']** ';	
	}else{
		return "";		
	}
}		

function check(a,b){
	cad ='document.formulario.'+a+'.checked';
	if (!eval(cad)){
		return ' **Debe seleccionar opcion [Registro '+b+'] ** ';
	}else{
		return "";		
	}
}	
function numer(a,b){	
	cad ='document.formulario.'+a+'.value';

	if (isNaN(eval(cad))){
		return ' **-El valor debe ser numerico [Registro '+b+'] ** ';
	}else{
		return "";
	}	
}

function verif1(a){
error='';
formu=a.split(',');
for (i=1;i<formu.length;i+=3)
	switch (formu[i]){
		case '1' :
			error += no_vacio(formu[i-1],formu[i+1]);
			break;
		case '2' :	
			error += selec(formu[i-1],formu[i+1]);
			break;
		case '3' :	
			error += mail(formu[i-1],formu[i+1]);
			break;
		case '4' :	
			error += check(formu[i-1],formu[i+1]);
			break;
		case '5' :	
			error += numer(formu[i-1],formu[i+1]);
			break;		
		case '6' :	
			error += esp_vacios(formu[i-1],formu[i+1]);
			break;
		
		break;				
		}

	if (error!=''){
		alert (error);
	}else{
		if(document.formulario.sub)
			document.formulario.sub.value=1;

		document.formulario.submit();		
	}
}/*fin funcion*/