function limpia(valor){
	if (valor=='Buscar...'){
		document.forma.busca.value='';
	}
}

function busca(lugar){
	cadena = document.forma.busca.value.replace(/(^\s*)|(\s*$)/g,""); 
		if (cadena.length==0){
			document.forma.busca.focus();
		}else{
			//alert(cadena);
			//alert(lugar);
			window.location=lugar+'buscar/?busca='+cadena;
		}
}


function emailCheck (emailStr) {
var checkTLD=1;
var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
var emailPat=/^(.+)@(.+)$/;
var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
var validChars="\[^\\s" + specialChars + "\]";
var quotedUser="(\"[^\"]*\")";
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
var atom=validChars + '+';
var word="(" + atom + "|" + quotedUser + ")";
var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
var matchArray=emailStr.match(emailPat);

if (matchArray==null) {
alert("La dirección de correo no es válida. \nFavor de revisarla");
return false;
}
var user=matchArray[1];
var domain=matchArray[2];

for (i=0; i<user.length; i++) {
if (user.charCodeAt(i)>127) {
alert("El nombre de usuario contiene caracteres invalidos. \nFavor de revisarla");
return false;
   }
}
for (i=0; i<domain.length; i++) {
if (domain.charCodeAt(i)>127) {
alert("El dominio contiene caracteres invalidos. \nFavor de revisarla");
return false;
   }
}

if (user.match(userPat)==null) {

alert("El usuario no es valido. \nFavor de revisarla");
return false;
}

var IPArray=domain.match(ipDomainPat);
if (IPArray!=null) {

for (var i=1;i<=4;i++) {
if (IPArray[i]>255) {
alert("La IP no es valida!");
return false;
   }
}
return true;
}

var atomPat=new RegExp("^" + atom + "$");
var domArr=domain.split(".");
var len=domArr.length;
for (i=0;i<len;i++) {
if (domArr[i].search(atomPat)==-1) {
alert("Este dominio no parece ser válido \nFavor de revisarla");
return false;
   }
}

if (checkTLD && domArr[domArr.length-1].length!=2 && 
domArr[domArr.length-1].search(knownDomsPat)==-1) {
alert("La dirección debe de tener un dominio válido.");
return false;
}

if (len<2) {
alert("La dirección de correo no tiene un nombre de dominio!");
return false;
}

return true;
}

function checkrequired(which) {
var pass=true;
comentario = document.emailform.Comentarios.value.replace(/(^\s*)|(\s*$)/g,""); 
//alert(document.emailform.Comentarios.value);
//return false;
if (comentario==''){
	alert("Falto proporcionar la informacion requerida en el campo de Comentarios");
	return false;
}
if (document.images) {
for (i=0;i<which.length;i++) {
var tempobj=which.elements[i];
if (tempobj.name.substring(0,8)=="required") {
if (((tempobj.type=="text"||tempobj.type=="file")&&
tempobj.value=='')||(tempobj.type.toString().charAt(0)=="s"&&
tempobj.selectedIndex==0)) {
pass=false;
break;
         }
      }
   }
}
if (!pass) {
shortFieldName=tempobj.name.substring(8,30).toUpperCase();
alert("Falto proporcionar la informacion requerida en el campo "+shortFieldName+" .");
return false;
}
else
return true;
}