function EnviarAmigo() {
  var frm = document.FrmMail
  if (frm.nom01.value == "") {
    alert("Por favor indique sus Nombres");
    frm.nom01.focus();
    return false;
  }

  if (!emailCheck(frm.correo01.value)) {
    frm.correo01.focus();
    return false;
  }
  
  if (frm.nom02.value == "") {
    alert("Indique Nombres del Destinatario");
    frm.nom02.focus();
    return false;
  }

  if (!emailCheck(frm.correo02.value)) {
    frm.correo02.focus();
    return false;
  }

  return confirm("Desea Enviar ahora el Formulario");
 // return true;
}

function Solicitud() {
  if(document.FrmPedido.nom01.value == "") {
    alert("Por favor indique sus Nombres");
    document.FrmPedido.nom01.focus();
    return false;
  }

  if(document.FrmPedido.correo01.value == "") {
    alert("Ingrese su Email");
    document.FrmPedido.correo01.focus();
    return false;
  }
  
  if(document.FrmPedido.mensaje.value == "") {
    alert("Ingrese el Mensaje de su Solicitud");
    document.FrmPedido.mensaje.focus();
    return false;
  }

  return confirm("Desea Enviar ahora el Formulario");
 // return true;
}

function Buscar() {
	if (document.FrmArt.especialidad.value == "") { 
		if(document.FrmArt.dato.value == "") {
			alert("Ingrese dato para criterio de Busqueda");
			document.FrmArt.dato.focus();
			return false;
		}
	}
//  return confirm("Desea Enviar ahora el Formulario");
	return true;
}

function NoVacio() {
	if (document.FrmArt.dato.value.length <= 1){
	    alert("el Datos a Buscar debe contener mas de 1 letra");
		document.FrmArt.dato.focus();
		document.FrmArt.dato.select();
		return false;
	}
	return true;
}

// FUNCION PARA VALIDAR EMAIL
function emailCheck (emailStr) {

var checkTLD = 1;
var knownDomsPat = /^(com|net|org|edu|int|mil|gov|gob|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("El email es incorrecto, verificar arrobas(@) y puntos(.)");
	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 del EMAIL contiene caracteres invalidos.");
		return false;
   }
}
for (i = 0; i < domain.length; i++) {
	if (domain.charCodeAt(i)>127) {
		alert("El dominio del EMAIL contiene caracteres invalidos.");
		return false;
   }
}

if (user.match(userPat) == null) {
	alert("El nombre de EMAIL no es valido.");
	return false;
}

var IPArray = domain.match(ipDomainPat);
if (IPArray != null) {

for (var i = 1;i <= 4;i++) {
	if (IPArray[i] > 255) {
		alert("Direccion IP de Destino es invalido!");
		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("El nombre del dominio no parece ser valido");
return false;
   }
}

if (checkTLD && domArr[domArr.length-1].length != 2 && 
domArr[domArr.length-1].search(knownDomsPat) == -1) {
	alert("La dirección debe terminar en dominio de pais conocido o en dos letras.");
	return false;
}

if (len < 2) {
	alert("El nombre del Hostname no existe!");
	return false;
}

return true;
}
