function AJAX() {
   var ajaxs = ["Msxml2.XMLHTTP","Msxml2.XMLHTTP.4.0","Msxml2.XMLHTTP.5.0","Msxml2.XMLHTTP.3.0","Microsoft.XMLHTTP"];
   var ajax = false;
   for(var i=0 ; !ajax && i<ajaxs.length ; i++) {
      try {
         ajax = new ActiveXObject(ajaxs[i]);
      }
      catch(e) {
         ajax = false;
      }
   }
   if(!ajax && typeof XMLHttpRequest!='undefined') {
      ajax = new XMLHttpRequest();
   }
   return ajax;
}
	
function CARGARDATOS(pagina,capa, parametros) {
   var ajax = AJAX();
   if(!ajax) {
      alert("Su navegador no soporta AJAX. Instale Internet Explorer 6 o Firefox");
      return false;
   }
   document.getElementById(capa).innerHTML = "<center><img  src='http://www.regionsanmartin.gob.pe/Admin/Img/cargar.gif' /> Procesando Solicitud</center><br>";
   ajax.open("POST",pagina,true);
   ajax.onreadystatechange = function() {
      if (ajax.readyState == 4) {
         document.getElementById(capa).innerHTML=ajax.responseText;
      }
   }
   ajax.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
   ajax.send(parametros);
}
	
function mostrar_responsable(Area, Dia, Mes, Anio) {
   CARGARDATOS('respons.php','respons','&Area=' + Area + '&Dia=' + Dia + '&Mes=' + Mes + '&Anio=' + Anio);
}
	
function mostrar_agendas(Area, Dia, Mes, Anio, Fecha) {
   CARGARDATOS('agendap.php','agenda','&Area=' + Area + '&Dia=' + Dia + '&Mes=' + Mes + '&Anio=' + Anio + '&Fecha=' + Fecha);
}

function mostrar_noticiasp(Where, Donde) {
   CARGARDATOS('noticias/noticiap.php', Donde,'Where=' + Where);
}
function mostrar_noticiasr(Where, Donde) {
   CARGARDATOS('noticias/noticiar.php', Donde,'Where=' + Where);
}
	
function mostrar_noticia(Where, Donde) {
   CARGARDATOS('noticias/noticia.php', Donde,'Where=' + Where);
}
	
function mostrar_noticia2(Where, Donde) {
   CARGARDATOS('noticias/noticia2.php', Donde,'Where=' + Where);
}
//Validar Numeros
function SoloNumeros(evt) {
   var keyPressed = (evt.which) ? evt.which : event.keyCode
   //alert(keyPressed);
   return !(keyPressed > 31 && (keyPressed < 48 || keyPressed > 57) &&keyPressed!=46 );
}

function ValidaPDF(obj) {
   var arrExtensions=new Array("pdf");
   var objInput = obj;
   var strFilePath = objInput.value;
   var arrTmp = strFilePath.split(".");
   var strExtension = arrTmp[arrTmp.length-1].toLowerCase();
   for (var i=0; i<arrExtensions.length; i++) {
      if (strExtension != arrExtensions[i]) {
         alert("El archivo no es PDF");
         objInput.name.focus();
         return false;
      }
   }
}

function validar(formulario) {
        if (formulario.nombres.value.length < 4) {
          alert("Por favor, escriba por lo menos 4 caracteres en el campo \"Nombre\".");
          formulario.nombres.focus();
          return (false);
        }
        var checkOK = "ABCDEFGHIJKLMNÑOPQRSTUVWXYZÁÉÍÓÚ" + "abcdefghijklmnñopqrstuvwxyzáéíóú ";
        var checkStr = formulario.nombres.value;
        var allValid = true;
        for (i = 0; i < checkStr.length; i++) {
          ch = checkStr.charAt(i);
          for (j = 0; j < checkOK.length; j++)
            if (ch == checkOK.charAt(j))
              break;
          if (j == checkOK.length) {
            allValid = false;
            break;
          }
        }
        if (!allValid) {
          alert("Escriba sólo letras en el campo \"Nombre\".");
          formulario.nombres.focus();
          return (false);
        }
  
        if (formulario.subject.value.length < 4) {
          alert("Por favor, escriba por lo menos 4 caracteres en el campo \"Tema\".");
          formulario.subject.focus();
          return (false);
        }
    	
        if ((formulario.email.value.indexOf ('@', 0) == -1)||(formulario.email.value.length < 5)) {
          alert("Escriba una dirección de correo electrónico válido");
          return (false);
        }
        if (formulario.txtbody.value.length < 4) {
          alert("Por favor, escriba por lo menos 4 caracteres en el campo \"Comentarios\".");
          formulario.txtbody.focus();
          return (false);
        }
        return (true);
      }
