function emailvalidation(entered, alertbox)
{
// E-mail Validation by Henrik Petersen / NetKontoret
// Explained at www.echoecho.com/jsforms.htm
// Please do not remove this line and the two lines above.
  with (entered)
  {
    apos=value.indexOf("@");
    dotpos=value.lastIndexOf(".");
    lastpos=value.length-1;
    if (apos<1 || dotpos-apos<2 || lastpos-dotpos>3 || lastpos-dotpos<2)
      {if (alertbox) {alert(alertbox);} return false;}
    else {return true;}
  }
}

function emptyvalidation(entered, alertbox)
{
  // Emptyfield Validation by Henrik Petersen / NetKontoret
  // Explained at www.echoecho.com/jsforms.htm
  // Please do not remove this line and the two lines above.
  with (entered)
  {
    if (value==null || value=="")
      {if (alertbox!="") {alert(alertbox);} return false;}
    else {return true;}
  }
}

  function formvalidation(thisform)
  {
    with (thisform)
    {
      if (emailvalidation(email,"The Email is not valid")==false) {email.focus(); return false;};
      if (emptyvalidation(gene,"The Gene Name or Rv Number is empty")==false) {gene.focus(); return false;};
    }
  } 

