function test(toTest) {
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("original:
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("");
Response.Write(Server.HTMLEncode( toTest ) + "
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("RemoveHTML() returns:
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("");
Response.Write(Server.HTMLEncode( toTest.RemoveHTML() ) + "
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("RemoveASP() returns:
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("");
Response.Write(Server.HTMLEncode( toTest.RemoveASP() ) + "
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("ReturnASP() returns:
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("");
Response.Write(Server.HTMLEncode( toTest.ReturnASP() ) + "
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("RemoveHTMLTag(\"Body\") returns:
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("");
Response.Write(Server.HTMLEncode( toTest.RemoveHTMLTag("BODY") ) + "\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("ExtractTitle() returns:
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("");
Response.Write(Server.HTMLEncode( toTest.ExtractTitle() ) + "
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("ExtractBody() returns:
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("");
Response.Write(Server.HTMLEncode( toTest.ExtractBody() ) + "
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("LinkIncludes() returns:
\n\n\n");
Response.Write("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
\n\n\n");
Response.Write("");
toTest = Server.HTMLEncode(toTest);
Response.Write( toTest.LinkIncludes() + "
\n\n\n");
return;
}
function IsEmailAddress(email) {
var s = "", re;
//instância de email.
s = "" + email + "";
//testa tamanho: remove os espeços e testa o comprimento
//x@x.xx é o mais pequeno endereço, isto é, 6 caracteres. Dessa maneira,
//o comprimento tem que ser maior que 5 para continuar.
s = s.replace(/^\s*|\s*$/g, "");
if (s == "undefined" || s.length < 6) {return false;}
//testa os espaços antes da sintaxe. Espaços são ilegais num email.
//Se um espaço é encontrado, o email é inválido.
re = /\s+/g
if (re.test(s)) {return false;}
//valida a sintaxe do endereço de email através de expressões regulares
re = /^(\w|[^_]\.|[\-])+((\@){1}([^_]))(([a-z]|[\d]|[\-]|\.)+|([^_]\.[^_])*)+\.[a-z]{2,6}$/i
if (!re.test(s)) {return false;}
//valida o dominio do email tendo em conta todas as TLDs conhecidas até Maio de 2001
re = /\.(a[c-gil-oq-uwz]|b[a-bd-jm-or-tvwyz]|c[acdf-ik-orsuvx-z]|d[ejkmoz]|e[ceghr-u]|f[i-kmorx]|g[abd-ilmnp-uwy]|h[kmnrtu]|i[delm-oq-t]|j[emop]|k[eg-imnprwyz]|l[a-cikr-vy]|m[acdghk-z]|n[ace-giloprtuz]|om|p[ae-hk-nrtwy]|qa|r[eouw]|s[a-eg-ort-vyz]|t[cdf-hjkm-prtvwz]|u[agkmsyz]|v[aceginu]|w[fs]|y[etu]|z[admrw]|com|edu|net|org|mil|gov|biz|pro|aero|coop|info|name|museum)$/i
if (!re.test(s)) {return false;}
//elimina o email caso tenha ..
re = /\.\./
if (re.test(s)) {return false;}
//elimina o email caso tenha @@
re = /\@\@/
return(!re.test(s));
}