function CheckForm() {
var message ="";
if (document.Form1.AName.value.length <= 3){message = message +" Please Enter Your Full Name!\n";}
if (message.length > 0)
{alert (message);
return false; }
if (document.Form1.userName.value.length <= 5) {message = message +" Please Enter Your User Name (min of 5 Characters)!\n";}if (message.length > 0)
{alert (message);
return false; }

var EmailCorrect = false

for (var i = 0; i <= document.Form1.Hemail.value.length; i++)
{

 if (document.Form1.Hemail.value.charAt(i) == "@") {EmailCorrect = true}
}
var EMLength = document.Form1.Hemail.value.length

if (document.Form1.Hemail.value.substring(EMLength - 3, EMLength) != "com" &&
    document.Form1.Hemail.value.substring(EMLength - 3, EMLength) != "COM" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "uk" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sy" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "de" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "in" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "br" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "fr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "za" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "it" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "vn" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ch" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pe" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "eg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "id" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "nl" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "es" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "jp" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mx" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pk" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "dk" &&
    document.Form1.Hemail.value.substring(EMLength - 3, EMLength) != "gov" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "th" &&
    document.Form1.Hemail.value.substring(EMLength - 3, EMLength) != "edu" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "IN" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "kr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "KR" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cn" &&
    document.Form1.Hemail.value.substring(EMLength - 3, EMLength) != "net" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ac" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ad" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ae" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "af" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ag" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ai" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "al" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "am" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "an" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ao" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "aq" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ar" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "as" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "at" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "au" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "aw" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "az" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ba" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bb" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bd" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "be" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bf" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bh" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bi" &&
 document.Form1.Hemail.value.substring(EMLength - 3, EMLength) != "biz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bj" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bn" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bo" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bs" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bt" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bv" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bw" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "by" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "bz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ca" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cc" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cd" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cf" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ci" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ck" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cl" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "co" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cu" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cv" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cx" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cy" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "cz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "dj" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "dm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "do" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "dz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ec" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ee" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "eh" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "er" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "et" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "fi" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "fj" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "fk" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "fm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "fo" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ga" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gd" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ge" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gf" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gh" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gi" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gl" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gn" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gp" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gq" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gs" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gt" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gu" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gw" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "gy" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "hk" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "hm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "hn" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "hr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ht" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "hu" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ie" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "im" &&
   document.Form1.Hemail.value.substring(EMLength - 4, EMLength) != "info" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "io" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "iq" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ir" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "is" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "je" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "jm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "jo" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ke" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "kg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "kh" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ki" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "km" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "kn" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "kp" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "kw" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ky" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "kz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "la" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "lb" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "lc" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "li" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "lk" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "lr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ls" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "lt" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "lu" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "lv" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ly" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ma" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mc" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "md" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mh" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mk" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ml" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mn" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mo" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mp" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mq" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ms" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mt" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mu" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mv" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mw" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "my" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "mz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "na" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "nc" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ne" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "nf" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ng" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ni" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "no" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "np" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "nr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "nu" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "nz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "om" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pa" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pf" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ph" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pl" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pn" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ps" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pt" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "pw" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "py" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "qa" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "re" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ro" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ru" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "rw" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sa" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sb" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sc" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sd" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "se" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sh" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "si" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sj" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sk" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sl" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sn" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "so" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sr" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "st" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sv" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "sz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tc" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "td" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tf" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tj" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tk" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tn" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "to" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tp" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tt" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tv" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tw" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "tz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ua" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ug" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "um" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "us" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "uy" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "uz" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "va" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "vc" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ve" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "vg" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "vi" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "vu" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "wf" &&
   document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ws" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "ye" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "yt" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "yu" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "zm" &&
    document.Form1.Hemail.value.substring(EMLength - 2, EMLength) != "zw" &&
    document.Form1.Hemail.value.substring(EMLength - 3, EMLength) != "org") {EmailCorrect = false}

if (EmailCorrect == false){alert("Your Email address appears to be invalid! Please check and re-enter."); return false}
else
{return true;}
}