<!-- SEM ERRO DE SCRIPT
//function semerro(){return true;}
//window.onerror=semerro();
//--> SEM ERRO DE SCRIPT

<!-- INICIO
var aurl=window.location.href;
if(aurl.indexOf("contato.asp")!=-1){
var EnviarContato=function(){envia("formail.asp","tipo=0&enviado=sim");}
juntaronload(function(){
forme();
padrao(EnviarContato);
Contar("mensagem","exibicao",1024);
},"")
//}else if(aurl.indexOf("dominio_editar.asp")!=-1){
//juntaronload(function(){
//Ajuda();
//},"")
}
//--> INICIO

<!-- SELECT COM URL
function url(id,aurl){
  eval("location='"+aurl+id.options[id.selectedIndex].value+"'");
}
//--> SELECT COM URL

<!-- ESQUECI A SENHA
function esq_senha(){
if(document.getElementById("esqueci")){
var olk=document.getElementById("esqueci");
addEvent(olk,"click",esqueci);
}
}
function esqueci(){
var email=prompt("Digite seu email para receber sua senha!","");
if((email==null) || (email=="")){
//alert("Nenhum email informado!");
}else{
envia("email.asp","tipo=esqueci&enviado=sim&email="+encodeURIComponent(email));
}
return false;
}
//--> ESQUECI A SENHA

<!-- SELECT COM URL
function Url(alvo,endereco,id){
  eval(alvo+".location='"+endereco+id.options[id.selectedIndex].value+"'");
}
//--> SELECT COM URL

<!-- ESQUECI A SENHA
function pede_pra_sair(){
if(document.getElementById("sair")){
var sai=document.getElementById("sair");
addEvent(sai,"click",sair);}
}
function sair(){
var sai=document.getElementById("sair");
var saindo=confirm("Deseja realmente sair?");
if(saindo){
top.location.href="painel.asp?sair=sim";
return false;
}else{
sai.href="#";
return false;
}
}
//--> ESQUECI A SENHA

<!-- VERIFICAÇÃO
function verificacao(funcao){
if(document.getElementById("id")){
if(document.getElementById("id").value!=""){
enviaforme("sim",funcao);
}else{
Contar("observacao","exibicao",1024);
}
}
}
//--> VERIFICAÇÃO

<!-- MENSAGEM DE OK
function aMensagem(mensagem){
if(document.getElementById("atual")){
if(document.getElementById("atual").value!=""){
alert(mensagem);
}
}
}
//--> MENSAGEM DE OK

<!-- ENVIAR FORME
function envia(url,campos){
if((url=="") && (campos=="")){
if(document.getElementsByTagName("form")){
var formulario=document.getElementsByTagName("form");
formulario[0].submit();
//window.location.href=window.location;
}else{
alert("Envio Cancelado!");
}
}else{
var dados=campos;
var conc="&";
var labels=document.getElementsByTagName("label");
var button=document.getElementsByTagName("button");
button[0].disabled=true;
button[0].innerHTML="Enviando aguarde...";
button[0].className="auto";
if(button[1]){
button[1].style.visibility="hidden";
}
for(var i=0;i<labels.length;i++){
var label=labels[i];
var input=label.childNodes[2];
if((input.tagName!="INPUT") && (input.tagName!="TEXTAREA") && (input.tagName!="SELECT")){
var input=label.childNodes[3];
}
dados=dados+conc+input.id+"="+encodeURIComponent(input.value);
}
var ajax=XMLHTTPRequest();
ajax.open("POST",url,true);
ajax.setRequestHeader("Content-type","application/x-www-form-urlencoded");
ajax.setRequestHeader("Content-length",dados.length);
ajax.setRequestHeader("Content-Type","application/x-www-form-urlencoded; charset=iso-utf-8");
ajax.send(dados);
ajax.onreadystatechange=function(){
if(ajax.readyState==1){
}else if(ajax.readyState==4){
if(ajax.status==200){
var button=document.getElementsByTagName("button");
button[0].disabled=false;
button[0].innerHTML="Enviar";
button[0].className="auto";
if(button[1]){
button[1].style.visibility="visible";
}
enviaforme("sim",envia);
var resposta=ajax.responseText;
if(resposta.indexOf("Erro!")!=-1){
alert(resposta);
}else if(resposta.indexOf("Sucesso!")!=-1){
alert(resposta);
if(url!="autenticar.asp"){
limpar();
}else{
top.location.href="painel.asp";
}
////////////////////////////////////////////////////////////////
}else if(resposta.indexOf("cadastro.asp?nome=")!=-1){
location.href=resposta;
////////////////////////////////////////////////////////////////
}else{
alert("Erro Interno! Tente novamente mais tarde!");
}
return false;
}
}
}
}
}
//--> ENVIAR FORME

<!-- CARREGA AJAX
function carregaAjax(id,url){
if(typeof id=="string"){
var exibeResultado=document.getElementById(id);
}else{
var exibeResultado=id;
}
var ajax=XMLHTTPRequest();
ajax.open("GET",url,true);
ajax.onreadystatechange=function(){
if(ajax.readyState==1){
exibeResultado.innerHTML="carregando...";
}else if(ajax.readyState==4){
if(ajax.status==200){
var resultado=ajax.responseText;
resultado=resultado.replace(/\+/g," ");
resultado=unescape(resultado);
exibeResultado.innerHTML=resultado;
}else{
exibeResultado.innerHTML="erro!";
}
}
}
ajax.send(null);
}
//--> CARREGA AJAX

<!-- PADRÃO DO FORME
function padrao(funcao){
if(document.getElementsByTagName("button")[0]){
var cmp2=document.getElementsByTagName("button")[0];
var men2=function(){cmp2.focus();}
var men3=function(){cmp2.className="ent";}
var men4=function(){cmp2.className="";}
addEvent(cmp2,"mouseover",men2);
addEvent(cmp2,"focus",men3);
addEvent(cmp2,"blur",men4);
if(document.getElementById("limpar")){
var frm=document.getElementsByTagName("form")[0];
var botao=frm.limpar;
var pai=botao.parentNode;
pai.removeChild(botao);
var novoBotao=document.createElement("button");
novoBotao.setAttribute("type","button");
novoBotao.setAttribute("id","limpar");
novoBotao.setAttribute("name","limpar");
novoBotao.setAttribute("tabIndex",parseInt(cmp2.tabIndex)+1);
novoBotao.innerHTML="Limpar";
novoBotao.onclick=function(){confirma("Deseja realmente Limpar?",limpar);}
pai.appendChild(novoBotao);
}
}
if(document.forms[0]){
document.forms[0].onsubmit=function(){return enviaforme("",funcao);}
}
}
//--> PADRÃO DO FORME

<!-- VERIFICA VALIDAÇÃO FORME E ENVIA
function enviaforme(confere,funcao){
var labels=document.getElementsByTagName("label");
var formulario=document.forms[0];
var valor=0;
for(var i=0;i<labels.length;i++){
var label=labels[i];
var oid=label.getAttributeNode("for").value;
var strong=document.getElementById("strong_"+oid);
var hidden=document.getElementById("input_"+oid);
var input=document.getElementById(oid);
var obrigatorio=strong.innerHTML;
if(input.className!="liberado"){
if((confere!="") && (label.className=="")){var api="sim";}else{var api="";}
if(input.disabled==false){
valida(oid,document.getElementById(oid).value,"post",api);
if((obrigatorio.indexOf("*")!=-1) && (hidden.className=="erro")){
valor=parseInt(valor)+parseInt(hidden.getAttribute("value"));}}
}
}
if(confere==""){
if(valor==0){
funcao();
}else{
alert("Verfique os campos em vermelho!");
}
}
return false;
}
//--> VERIFICA VALIDAÇÃO FORME E ENVIA

<!-- VALIDAR FORME
function valida(campo,valor,metodo,estilo){
var ospan="span_"+campo;
var ocamp="input_"+campo;
var label="label_"+campo;
if(metodo==""){metodo="post";}
var button=document.getElementsByTagName("button")[0];
var campos={
foco:document.getElementById(ospan),
iput:document.getElementById(ocamp),
labe:document.getElementById(label),
alvo:document.getElementById(campo),
senh:document.getElementById("senha"),
exte:document.getElementById("extensao"),
esco:document.getElementById("escolha")};
if((campos.alvo.getAttribute("type")=="radio") && (campos.alvo.checked!=true)){
valor="";
}else if(campos.alvo.id=="confirmar_senha"){
valor=campos.senh.value+'|'+valor;
}else if(campos.alvo.id=="dominio"){
valor=valor+'|'+campos.exte.value+'|'+campos.esco.value;
}else if((campos.alvo.id=="aceito") && (campos.alvo.checked!=true)){
valor="";
}
if(document.getElementById("id")){
var dados="campo="+encodeURIComponent(campo)+"&valor="+encodeURIComponent(valor)+"&id="+encodeURIComponent(document.getElementById("id").value);
}else{
var dados="campo="+encodeURIComponent(campo)+"&valor="+encodeURIComponent(valor);
}
var ajax=XMLHTTPRequest();
if(metodo=="get"){
ajax.open("GET",("inc/valida.asp?"+dados),true);
}else{
ajax.open("POST","inc/valida.asp",true);
ajax.setRequestHeader("Content-type","application/x-www-form-urlencoded");
ajax.setRequestHeader("Content-length",dados.length);
ajax.setRequestHeader("Content-Type","application/x-www-form-urlencoded; charset=iso-utf-8");
ajax.send(dados);
}
ajax.onreadystatechange=function(){
if(ajax.readyState==1){
campos.alvo.disabled=true;
campos.foco.className="";
campos.foco.innerHTML="pesquisando...";
button.disabled=true;
}else if(ajax.readyState==4){
campos.foco.innerHTML="&nbsp;";
if(ajax.status==200){
var r=ajax.responseText,i,focar,errado;
focar=r.substring(0,(i=r.indexOf("|")));
r=r.substring(++i);
errado=r.substring(1,(i=r.indexOf("|")));
r=r.substring(++i);
if(errado=="0"){
campos.iput.value="0";
if(campo=="dominio"){autorizarDominio("0");}
if(estilo!="sim"){
campos.labe.className="sim "+campos.alvo.id+"_a";
if((campo=="login_aut") || (campo=="senha_aut") || (campo=="nome_cad") || (campo=="email_cad")){
focar="Preenchido Corretamente";
}
campos.foco.innerHTML=focar;
}
}else if(errado=="1"){
campos.iput.value="1";
if(campo=="dominio"){autorizarDominio("1");}
if(estilo!="sim"){
campos.labe.className="nao "+campos.alvo.id+"_b";
campos.foco.innerHTML=focar;
}else{
campos.iput.value="1";
if(campo=="dominio"){autorizarDominio("1");}
if(estilo!="sim"){
campos.labe.className="";
campos.foco.innerHTML="&nbsp;";
}
}
}
}
campos.alvo.disabled=false;
button.disabled=false;
}
}
if(metodo=="get"){
ajax.send(null);
}
}
//--> VALIDAR FORME

<!-- LIMPAR FORM
function limpar(){
var labels=document.getElementsByTagName("label");
for(var i=0;i<labels.length;i++){
var label=labels[i];
var oid=label.getAttributeNode("for").value;
var span=document.getElementById("span_"+oid);
var input=document.getElementById(oid);
label.className="";
input.value="";
span.innerHTML="&nbsp;";
}
var textareas=document.getElementsByTagName("textarea");
for(var i=0;i<textareas.length;i++){
var textarea=textareas[i];
Contar(textarea.id,"exibicao",1024);
}
}
<!-- LIMPAR FORM

<!-- FORME
function forme(){
if(document.getElementsByTagName("label")[0]){
var erro="1";
var labels=document.getElementsByTagName("label");
if(document.getElementsByTagName("button")[0]){
var button=document.getElementsByTagName("button")[0];
button.tabIndex=labels.length+1;
}
for(var i=0; i<labels.length ; i++){
var label=labels[i];
var oid=label.getAttributeNode("for").value;
label.id="label_"+oid;
if(label.getAttributeNode("title")){
var title=label.getAttributeNode("title");
if(title.value!=""){
var id1="'ajuda_"+oid+"'"
var cl1="'ajuda exibir'"
var cl2="'ajuda ocultar'"
label.innerHTML='<div id="icone_'+oid+'" class="icone" onclick="firmar('+id1+','+cl2+','+cl1+');return false;" onmouseout="firmar('+id1+','+cl1+','+cl2+');">&nbsp;</div><div id="ajuda_'+oid+'" class='+cl2+'>'+title.value+'</div>'+label.innerHTML;
label.removeAttribute("title");
var alter=2;
}else{
var alter=0;
}
}else{
var alter=0;
}
var strong=label.childNodes[parseInt(alter)+0];
if(strong.tagName!="STRONG"){var strong=label.childNodes[parseInt(alter)+1];}
strong.id="strong_"+oid
var obrigatorio=strong.innerHTML;
if(obrigatorio.indexOf("*")!=-1){
erro="1";
}else{
erro="0";
}
//label.innerHTML=label.innerHTML+"<span id='span_"+oid+"'>&nbsp;</span><input name='input_"+oid+"' id='input_"+oid+"' type='hidden' class='erro' value='"+erro+"' />";
label.innerHTML=label.innerHTML+"<input name='input_"+oid+"' id='input_"+oid+"' type='hidden' class='erro' value='"+erro+"' />";
var input=label.childNodes[parseInt(alter)+2];
if((input.tagName!="INPUT") && (input.tagName!="TEXTAREA") && (input.tagName!="SELECT")){
var input=label.childNodes[parseInt(alter)+3];}
input.tabIndex=i+1;
var span=label.childNodes[parseInt(alter)+4];
if(span.tagName!="SPAN"){var span=label.childNodes[parseInt(alter)+5];}
span.innerHTML="&nbsp;";
aplicainput(input);
}
}
}
//--> FORME

<!-- AJUDA
function firmar(id,class1,class2){
var div=document.getElementById(id);
if(div.className==class1){
div.className=class2;
}
}
//--> AJUDA

<!-- CONFIRMA AÇÃO
function confirma(msg,funcao){
var resposta=confirm(msg);
if(resposta){
funcao();
}else{
//alert("Nada foi alterado!")
document.getElementsByTagName("button")[1].focus();
}
}
//--> CONFIRMA AÇÃO

<!-- APLICAR INPUT
function aplicainput(obj){
//http://pt.wikibooks.org/wiki/Javascript:_Objeto_String
if(obj.id=="email"){
var clk1=function(){obj.value=obj.value.toLowerCase();}
addEvent(obj,"blur",clk1);
var clk2=function(){mascara(obj,email);}
addEvent(obj,"keyup",clk2);
}
if(obj.id=="telefone"){
var clk1=function(){mascara(obj,telefone);}
addEvent(obj,"keyup",clk1);
}
if(obj.id=="ramal"){
var clk1=function(){mascara(obj,soNumeros);}
addEvent(obj,"keyup",clk1);
}
if(obj.tagName=="TEXTAREA"){
var clk1=function(){Contar(obj.id,"exibicao",1024);}
addEvent(obj,"keyup",clk1);
}else{
var clk1=function(){autotab(obj);}
addEvent(obj,"keyup",clk1);
}
if(obj.id=="cep"){
addEvent(obj,"change",buscaCep);
var clk1=function(){mascara(obj,cep);}
addEvent(obj,"keyup",clk1);
}
if(obj.id=="numero"){
var clk1=function(){mascara(obj,soNumeros);}
addEvent(obj,"keyup",clk1);
}
if(obj.id=="login"){
var clk1=function(){mascara(obj,login);}
addEvent(obj,"keyup",clk1);
}
if(obj.id=="dominio"){
var clk1=function(){mascara(obj,dominio);}
addEvent(obj,"keyup",clk1);
}
if(obj.id=="senha"){
var clk1=function(){mascara(obj,semEspaco);}
addEvent(obj,"keyup",clk1);
}
if((obj.id=="cpf")||(obj.id=="cad_cpf")){
var clk1=function(){mascara(obj,cpf);}
addEvent(obj,"keyup",clk1);
}
if(obj.id=="cnpj"){
var clk1=function(){mascara(obj,cnpj);}
addEvent(obj,"keyup",clk1);
}
if(obj.id=="data_nascimento"){
var clk1=function(){mascara(obj,data);}
addEvent(obj,"keyup",clk1);
}
if((obj.getAttribute("type")=="radio") || (obj.getAttribute("type")=="checkbox")){
if((obj.id=="registrar") || (obj.id=="transferir") || (obj.id=="registrado")){
var escolha=document.getElementById("escolha");
var clk0=function(){valida(obj.id,obj.value,"post","");firmar("busca","ocultar","exibir");firmar("botoes","ocultar","botoes");escolha.value=obj.id;zerarOpcoes(obj);}
}else if((obj.id=="bronze") || (obj.id=="prata") || (obj.id=="ouro")){
var oplano=document.getElementById("oplano");
var clk0=function(){valida(obj.id,obj.value,"post","");zerarOpcoes(obj);oplano.value=obj.id;}
}else{
var clk0=function(){valida(obj.id,obj.value,"post","");}
}
addEvent(obj,"click",clk0);
}else if((obj.id=="dominio") || (obj.id=="extensao")){
var domi=document.getElementById("dominio");
var exte=document.getElementById("extensao");
var exten = exte.selectedIndex;
var extenc = exte.options[exten];
if(obj.id=="dominio"){var met="blur";}else{var met="change";}
var clk0=function(){valida(domi.id,domi.value,"get","");valida(exte.id,extenc.value,"get","");}
addEvent(obj,met,clk0);
}else{
var clk0=function(){valida(obj.id,obj.value,"get","");}
addEvent(obj,"blur",clk0);
}
}
//--> APLICAR INPUT

function checa(comeco,fim,check){
var labels=document.getElementsByTagName("label");
if(comeco==""){comeco=0;}
if(fim==""){fim=labels.length;}
for(var i=comeco;i<fim;i++){
var label=labels[i];
var oid=label.getAttributeNode("for").value;
var input=document.getElementById(oid);
if(input.disabled!=check){
input.disabled=check;
}
}
}


<!-- BUSCA CEP
function buscaCep(){
var campos ={
cep: document.getElementById("cep"),
endereco: document.getElementById("endereco"),
numero: document.getElementById("numero"),
bairro: document.getElementById("bairro"),
cidade: document.getElementById("cidade"),
uf: document.getElementById("uf")};
var ajax=XMLHTTPRequest();
ajax.open("GET",("inc/cep.asp?cep="+campos.cep.value.replace(/[^\d]*/,"")),true);
ajax.onreadystatechange=function(){
if(ajax.readyState==1){
campos.endereco.disabled=true;
campos.bairro.disabled=true;
campos.cidade.disabled=true;
campos.uf.display=true;
campos.endereco.value="Pesquisando Aguarde...";
campos.bairro.value="Pesquisando Aguarde...";
campos.cidade.value="Pesquisando Aguarde...";
}else if(ajax.readyState==4){
var r=ajax.responseText,i,endereco,bairro,cidade,uf;
endereco=r.substring(0,(i=r.indexOf(',')));
r=r.substring(++i);
bairro=r.substring(0,(i=r.indexOf(',')));
r=r.substring(++i);
cidade=r.substring(0,(i=r.indexOf(',')));
r=r.substring(++i);
uf=r.substring(0,(i=r.indexOf(',')));
campos.endereco.disabled=false;
campos.bairro.disabled=false;
campos.cidade.disabled=false;
campos.uf.disabled=false;
campos.endereco.value=endereco;
campos.bairro.value=bairro;
campos.cidade.value=cidade;
var p=campos.uf.options.length;
while(p--){
if(campos.uf.options[p].getAttribute("value")==uf){
break;}
}
campos.uf.selectedIndex=p;
valida(campos.endereco.id,campos.endereco.value,"get","");
valida(campos.bairro.id,campos.bairro.value,"get","");
valida(campos.cidade.id,campos.cidade.value,"get","");
valida(campos.uf.id,campos.uf.value,"get","");
}
};
ajax.send(null);
campos.numero.focus();
}
//--> BUSCA CEP

<!-- ALTERNA CLASSES
function classes(objeto,class1,class2){
if(typeof objeto=="string"){
var obj=document.getElementById(objeto);
}else{
var obj=objeto;
}
if(class2==""){
obj.className=class1;
}else{
if(obj.className==class2){
obj.className=class1;
}else{
obj.className=class2;
}
}
}
//--> ALTERNA CLASSES

<!-- EMPILHAR ONLOAD
function juntaronload(funcao,ordem){
var oldonload=window.onload;
if(typeof window.onload != "function"){
window.onload=funcao;
}else if(ordem=="1"){
window.onload=function(){
funcao();
if(oldonload){
oldonload();
}
}
}else{
window.onload=function(){
if(oldonload){
oldonload();
}
funcao();
}
}
}
//--> EMPILHAR ONLOAD

<!-- LIMITA O NUMERO DE CARACTERES NO CAMPO
function getObject(obj){
var theObj;
if(document.all){
if(typeof obj=="string"){
return document.all(obj);
}else{
return obj.style;
}
}
if(document.getElementById){
if(typeof obj=="string"){
return document.getElementById(obj);
}else{
return obj.style;
}
}
return null;
}
function Contar(entrada,saida,caracteres){
var entradaObj=getObject(entrada);
var saidaObj=getObject(saida);
var conteudo=caracteres - entradaObj.value.length;
var texto="Voc&ecirc; ainda pode digitar {CONTADOR} caracteres";
saidaObj.style.color="";
saidaObj.style.background="";
if(conteudo==1){
saidaObj.style.color="#000000";
saidaObj.style.background="#FFFF00";
texto="Voc&ecirc; ainda pode digitar {CONTADOR} caracter";
}
else if(conteudo==0){
saidaObj.style.color="#FF0000";
saidaObj.style.background="#FFFF00";
texto="Voc&ecirc; alcan&ccedil;ou o limite m&aacute;ximo de caracteres";
}
else if(conteudo < 0){
entradaObj.value=entradaObj.value.substr(0,caracteres);
saidaObj.style.color="#FFFFFF";
saidaObj.style.background="#FF0000";
texto="Limite m&aacute;ximo de caracteres atingido!";
}
saidaObj.innerHTML=texto.replace("{CONTADOR}",conteudo);
}
//--> LIMITA O NUMERO DE CARACTERES NO CAMPO

<!-- PULAR CAMPO
function autotab(input){
if(input.value.length==input.getAttribute("maxlength")){
var form=document.forms[0];
var indexToFind = (input.tabIndex+1);
for(i=0; i < form.elements.length; i++){
var element=form.elements[i];
if(element.tabIndex==indexToFind){
element.focus();
break;
}
}
}
}
//--> PULAR CAMPO

<!-- LINK EXTERNO
function externo(){
if(document.getElementsByTagName){
var ancoras=document.getElementsByTagName("a");
for(var i=0; i<ancoras.length; i++){
var ancora=ancoras[i];
if(ancora.getAttribute("href") && ancora.getAttribute("rel")=="externo"){
ancora.target="_blank";
}
}
}
}
//--> LINK EXTERNO

<!-- ZEBRA
function zebra(id,classe){
var tabela=document.getElementById(id);
var linhas=tabela.getElementsByTagName("tr");
for(var i=0; i < linhas.length; i++){
if(linhas[i].className==""){
((i%2)==0) ? linhas[i].className=classe : void(0);
}
}
}
//--> ZEBRA

<!-- SIM E NÃO NA TABELA
function simnao(id,sim,nao){
var tabela=document.getElementById(id);
var linhas=tabela.getElementsByTagName("td");
for(var i=0; i < linhas.length; i++){
if(linhas[i].innerHTML==sim){
linhas[i].className=sim;
}else if(linhas[i].innerHTML==nao){
linhas[i].className=nao;
}
}
}
//--> SIM E NÃO NA TABELA

<!-- PEGA VALORES DO ENDEREÇO (URL STRING)
function jsGet(param){
var wl=window.location.href;
var params=urlDecode(wl.substring(wl.indexOf("?")+1));
return(params[param]);
}
function urlDecode(string,overwrite){
if(!string || !string.length){
return{};
}
var obj ={};
var pairs=string.split('&');
var pair,name,value;
var lsRegExp=/\+/g;
for(var i=0,len=pairs.length; i < len; i++){
pair=pairs[i].split('=');
name=unescape(pair[0]);
value=unescape(pair[1]).replace(lsRegExp," ");
//value=decodeURIComponent(pair[1]).replace(lsRegExp," ");
if(overwrite !== true){
if(typeof obj[name]=="undefined"){
obj[name]=value;
}else if(typeof obj[name]=="string"){
obj[name]=[obj[name]];
obj[name].push(value);
}else{
obj[name].push(value);
}
}else{
obj[name]=value;
}
}
return obj;
}
//--> PEGA VALORES DO ENDEREÇO (URL STRING)

<!-- IFRAME
function iframeAutoHeight(quem){
//by Micox - elmicox.blogspot.com - elmicox.com - webly.com.br 
if(navigator.appName.indexOf("Internet Explorer")>-1){//ie sucks
var func_temp=function(){
var val_temp=quem.contentWindow.document.body.scrollHeight
quem.style.height=val_temp + "px";
}
setTimeout(function(){func_temp()},100) //ie sucks
}else{
var val=quem.contentWindow.document.body.parentNode.offsetHeight
quem.style.height= val + 10 + "px";
}
}
//--> IFRAME

<!-- ONREADY
function OnReady(func){
if(!(document.body==null)){
func();
}else{
var func_rep=func;
setTimeout(function(){OnReady(func_rep)},100);
}
}
//--> ONREADY

<!-- IMPORTA JAVASCRIPT
function importa(arquivo,onde){
var script=document.createElement("script");
script.src=arquivo;
script.type="text/javascript";
script.defer=true;
if(onde=="body"){
var abody=document.getElementsByTagName("body").item(0);
abody.appendChild(script);
}else{
var ahead=document.getElementsByTagName("head").item(0);
ahead.appendChild(script);
}
}
//--> IMPORTA JAVASCRIPT

<!-- ADICIONA EVENTOS
function addEvent(obj,evt,fnc){
if(obj.addEventListener){
if(window.opera){
obj.addEventListener(evt,fnc,false)
}else{
obj.addEventListener(evt,fnc,true)
}
}else if(obj.attachEvent){
obj.attachEvent("on"+evt,fnc)
}
}
//addEvent(window,"load",inicio);
//--> ADICIONA EVENTOS

<!-- CONECTA AJAX
function XMLHTTPRequest(){
try{
return new XMLHttpRequest(); // FF,Safari,Konqueror,Opera,...
}catch(ee){
try{
return new ActiveXObject("Msxml2.XMLHTTP"); // activeX (IE5.5+/MSXML2+)
}catch(e){
try{
return new ActiveXObject("Microsoft.XMLHTTP"); // activeX (IE5+/MSXML1)
}catch(E){
alert("Sem suporte Ajax neste Navegador!");
return false; // sem suporte
}
}
}
}
//--> CONECTA AJAX

<!-- EFEITO
//fadeIn("id",25,100,0.5);fadeOut("id",100,25,0.5);
function fadeOut(id,de,para,time){
var target=document.getElementById(id);
var timer=(time*1000)/50;
var i=setInterval(
function(){
if(de <= para)
clearInterval(i);
setAlpha(target,de);
de -= 2;
},timer);
}
function fadeIn(id,de,para,time){
var target=document.getElementById(id);
var timer=(time*1000)/50;
var i=setInterval(
function(){
if(de >= para)
clearInterval(i);
setAlpha(target,de);
de += 2;
},timer);
}
function setAlpha(target,alpha){
target.style.filter="alpha(opacity="+ alpha +")";
target.style.opacity=alpha/100;
}
//--> EFEITO

<!-- FUNÇÕES DE MASCARAS DO ÉLCIO
//http://elcio.com.br/ajax/mascara/
function mascara(o,f){
v_obj=o
v_fun=f
setTimeout("execmascara()",1)
}
function execmascara(){
v_obj.value=v_fun(v_obj.value)
}
function leech(v){
v=v.replace(/o/gi,"0")
v=v.replace(/i/gi,"1")
v=v.replace(/z/gi,"2")
v=v.replace(/e/gi,"3")
v=v.replace(/a/gi,"4")
v=v.replace(/s/gi,"5")
v=v.replace(/t/gi,"7")
return v
}
function soNumeros(v){
return v.replace(/\D/g,"")//Remove tudo o que não é dígito
}
function telefone(v){
v=v.replace(/\D/g,"")
v=v.replace(/^(\d\d)(\d)/g,"($1) $2")
v=v.replace(/(\d{4})(\d)/,"$1-$2")
return v
}
function cpf(v){
v=v.replace(/\D/g,"")
v=v.replace(/(\d{3})(\d)/,"$1.$2")
v=v.replace(/(\d{3})(\d)/,"$1.$2")
v=v.replace(/(\d{3})(\d{1,2})$/,"$1-$2")
return v
}
function cep(v){
v=v.replace(/\D/g,"")
v=v.replace(/^(\d{5})(\d)/,"$1-$2")
return v
}
function data(v){
v=v.replace(/\D/g,"")
v=v.replace(/(\d{2})(\d)/,"$1/$2")
v=v.replace(/(\d{2})(\d)/,"$1/$2")
return v
}
function cnpj(v){
v=v.replace(/\D/g,"")
v=v.replace(/^(\d{2})(\d)/,"$1.$2")
v=v.replace(/^(\d{2})\.(\d{3})(\d)/,"$1.$2.$3")
v=v.replace(/\.(\d{3})(\d)/,".$1/$2")
v=v.replace(/(\d{4})(\d)/,"$1-$2")
return v
}
function romanos(v){
v=v.toUpperCase() //Maiúsculas
v=v.replace(/[^IVXLCDM]/g,"") //Remove tudo o que não for I,V,X,L,C,D ou M
//Essa é complicada! Copiei daqui: http://www.diveintopython.org/refactoring/refactoring.html
while(v.replace(/^M{0,4}(CM|CD|D?C{0,3})(XC|XL|L?X{0,3})(IX|IV|V?I{0,3})$/,"")!="")
v=v.replace(/.$/,"")
return v
}
function site(v){
v=v.replace(/^http:\/\/?/,"")
dominio=v
caminho=""
if(v.indexOf("/")>-1)
dominio=v.split("/")[0]
caminho=v.replace(/[^\/]*/,"")
dominio=dominio.replace(/[^\w\.\+-:@]/g,"")
caminho=caminho.replace(/[^\w\d\+-@:\?&=%\(\)\.]/g,"")
caminho=caminho.replace(/([\?&])=/,"$1")
if(caminho!="")dominio=dominio.replace(/\.+$/,"")
v="http://"+dominio+caminho
return v
}
function email(v){
v=v.replace(/[^\w\.\-@]/g,"")
return v
}
function semEspaco(v){
v=v.replace(/ /,"")
return v
}
function login(v){
v=v.replace(/[^\w]/g,"")
return v
}
function dominio(v){
v=v.toLowerCase()
v=v.replace(/_/,"")
v=v.replace(/[^\w\-]/g,"")
return v
}
//--> FUNÇÕES DE MASCARAS DO ÉLCIO