function isEmail(string) {
    if (string.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1)
        return true;
    else
        return false;
  }

  function valida_suscripcion() {
    if (document.forma_suscribir.email.value == "" || document.forma_suscribir.email.value == "email") {
     alert("Correo electrónico requerido.");
     document.forma_suscribir.email.focus();
     return;
     }
    if (isEmail(document.forma_suscribir.email.value) == false) {
     alert("Correo electrónico inválido.");
     document.forma_suscribir.email.focus();
     return;
     }
	if (document.forma_suscribir.tipo_accion.value==1) document.forma_suscribir.action='suscribir_boletin.php';
	if (document.forma_suscribir.tipo_accion.value==2) document.forma_suscribir.action='editar_suscripcion.php';
	if (document.forma_suscribir.tipo_accion.value==3) document.forma_suscribir.action='remover_suscripcion.php';
    document.forma_suscribir.submit();
  }

  function valida_suscripcion_i() {
    if (document.forma_suscribir.email.value == "" || document.forma_suscribir.email.value == "email") {
     alert("E-mail is required.");
     document.forma_suscribir.email.focus();
     return;
     }
    if (isEmail(document.forma_suscribir.email.value) == false) {
     alert("Invalid E-mail.");
     document.forma_suscribir.email.focus();
     return;
     }
	if (document.forma_suscribir.tipo_accion.value==1) document.forma_suscribir.action='suscribir_boletin_i.php';
	if (document.forma_suscribir.tipo_accion.value==2) document.forma_suscribir.action='editar_suscripcion_i.php';
	if (document.forma_suscribir.tipo_accion.value==3) document.forma_suscribir.action='remover_suscripcion_i.php';
    document.forma_suscribir.submit();
  }