/* Control Formulario */



function comprobar(which){

var pass=true

if (document.images){

for (i=0;i<which.length;i++){

var tempobj=which.elements[i]

if (tempobj.id.substring(0,8)=="required"){

if( ((tempobj.type=="text"||tempobj.type=="textarea") && (tempobj.value==''||tempobj.value==' '))
||(tempobj.type.toString().charAt(0)=="s"&&tempobj.selectedIndex==-1)){

pass=false

break

}

}

}

}

if (!pass){

alert("Debes rellenar todos los campos obligatorios para enviar el formulario")

return false

}

else

return true

}

function EsNumerico(idobj){
   var chr;
   if (idobj.value==null || idobj.value.length==0) { return false; }
   for (var i=0;i<idobj.value.length;i++){
     chr=idobj.value.substring(i,i+1);
     if (chr<"0"||chr>"9") return 0;
   }
   return 1;
}

var lwr = 'abcdefghijklmnñopqrstuvwxyzàèéíòóú';
var upr = 'ABCDEFGHIJKLMNÑOPQRSTUVWXYZÀÈÉÍÒÓÚ ';
var cadcaracters = lwr + upr;

function EsTexto(parm,lng) {
  if(lng==null){ lng=1; }
  if(lng > 0 && (parm.value==null || parm.value.length=="" || parm.value.length<lng) ){ return false; }

  for (i=0; i<parm.value.length; i++) {
    if (cadcaracters.indexOf(parm.value.charAt(i),0) == -1){ return false; }
  }
  return true;
}

function valida_email(obj)
{
  if (obj.value=='') { return 0; }
  else {
    if ( /^[A-Za-z0-9\.+_-]+@[A-Za-z0-9\.-]+\.[A-Za-z]{2,6}$/.test(obj.value)) {
       return 1;
    }
    else{ return 9; }
  }
}

/* Maxlength TextArea */

/***********************************************
* Textarea Maxlength script- © Dynamic Drive (www.dynamicdrive.com)
* This notice must stay intact for legal use.
* Visit http://www.dynamicdrive.com/ for full source code
***********************************************/

function ismaxlength(obj){
var mlength=obj.getAttribute? parseInt(obj.getAttribute("maxlength")) : ""
if (obj.getAttribute && obj.value.length>mlength)
obj.value=obj.value.substring(0,mlength)
}