http://www.brasiliaweb.com.br/javascript/criticas_campo.js

1function popdate(obj,div,tam,ddd){if(ddd){for(day="",mmonth="",ano="",c=1,char="",s=0;s<parseInt(ddd.length);s++)char=ddd.substr(s,1),"/"==char&&(c++,s++,char=ddd.substr(s,1)),1==c&&(day+=char),2==c&&(mmonth+=char),3==c&&(ano+=char);ddd=mmonth+"/"+day+"/"+ano}for(today=ddd?new Date(ddd):new Date,date_Form=eval(obj),date_Form=""==date_Form.value?new Date:new Date(date_Form.value),ano=today.getFullYear(),mmonth=today.getMonth(),day=today.toString().substr(8,2),umonth=new Array("Janeiro","Fevereiro","Março","Abril","Maio","Junho","Julho","Agosto","Setembro","Outubro","Novembro","Dezembro"),days_Feb=ano%4?28:29,days=new Array(31,days_Feb,31,30,31,30,31,31,30,31,30,31),(mmonth<0||mmonth>11)&&alert(mmonth),mmonth-1==-1?(month_prior=11,year_prior=ano-1):(month_prior=mmonth-1,year_prior=ano),mmonth+1==12?(month_next=0,year_next=ano+1):(month_next=mmonth+1,year_next=ano),txt="<table bgcolor='#efefff' style='border:solid #330099; border-width:2' cellspacing='0' cellpadding='3' border='0' width='"+tam+"' height='"+1.1*tam+"'>",txt+="<tr bgcolor='#FFFFFF'><td colspan='7' align='center'><table border='0' cellpadding='0' width='100%' bgcolor='#FFFFFF'><tr>",txt+="<td width=20% align=center><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+((mmonth+1).toString()+"/01/"+(ano-1).toString())+"') class='Cabecalho_Calendario' title='Ano Anterior'><<</a></td>",txt+="<td width=20% align=center><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+("01/"+(month_prior+1).toString()+"/"+year_prior.toString())+"') class='Cabecalho_Calendario' title='Mês Anterior'><</a></td>",txt+="<td width=20% align=center><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+("01/"+(month_next+1).toString()+"/"+year_next.toString())+"') class='Cabecalho_Calendario' title='Próximo Mês'>></a></td>",txt+="<td width=20% align=center><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+((mmonth+1).toString()+"/01/"+(ano+1).toString())+"') class='Cabecalho_Calendario' title='Próximo Ano'>>></a></td>",txt+="<td width=20% align=right><a href=javascript:force_close('"+div+"') class='Cabecalho_Calendario' title='Fechar Calendário'><b>X</b></a></td></tr></table></td></tr>",txt+="<tr><td colspan='7' align='center' bgcolor='#ccccff' class='mes'><a href=javascript:pop_year('"+obj+"','"+div+"','"+tam+"','"+(mmonth+1)+"') class='mes'><b>"+ano.toString()+"</b></a> - ",txt+=" <a href=javascript:pop_month('"+obj+"','"+div+"','"+tam+"','"+ano+"') class='mes'><b>"+umonth[mmonth]+"</b></a> <div id='popd' style='position:absolute'></div></td></tr>",txt+="<tr bgcolor='#330099'><td width='14%' class='dia' align=center><b>Dom</b></td><td width='14%' class='dia' align=center><b>Seg</b></td><td width='14%' class='dia' align=center><b>Ter</b></td><td width='14%' class='dia' align=center><b>Qua</b></td><td width='14%' class='dia' align=center><b>Qui</b></td><td width='14%' class='dia' align=center><b>Sex<b></td><td width='14%' class='dia' align=center><b>Sab</b></td></tr>",today1=new Date((mmonth+1).toString()+"/01/"+ano.toString()),diainicio=today1.getDay()+1,week=d=1,start=!1,n=1;n<=42;n++)1==week&&(txt+="<tr bgcolor='#efefff' align=center>"),week==diainicio&&(start=!0),d>days[mmonth]&&(start=!1),start?(dat=new Date((mmonth+1).toString()+"/"+d+"/"+ano.toString()),day_dat=dat.toString().substr(0,10),day_today=date_Form.toString().substr(0,10),year_dat=dat.getFullYear(),year_today=date_Form.getFullYear(),colorcell=day_dat==day_today&&year_dat==year_today?" bgcolor='#FFCC00' ":"",txt+="<td"+colorcell+" align=center><a href=javascript:block('"+d+"/"+(mmonth+1).toString()+"/"+ano.toString()+"','"+obj+"','"+div+"') class='data'>"+d.toString()+"</a></td>",d++):txt+="<td class='data' align=center> </td>",week++,8==week&&(week=1,txt+="</tr>");txt+="</table>",div2=eval(div),div2.innerHTML=txt}function pop_month(t,e,a,o){for(txt="<table bgcolor='#CCCCFF' border='0' width=80>",n=0;n<12;n++)txt+="<tr><td align=center><a href=javascript:popdate('"+t+"','"+e+"','"+a+"','"+("01/"+(n+1).toString()+"/"+o.toString())+"')>"+umonth[n]+"</a></td></tr>";txt+="</table>",popd.innerHTML=txt}function pop_year(t,e,a,o){for(txt="<table bgcolor='#CCCCFF' border='0' width=160>",l=1,n=1991;n<2012;n++)1==l&&(txt+="<tr>"),txt+="<td align=center><a href=javascript:popdate('"+t+"','"+e+"','"+a+"','"+(o.toString()+"/01/"+n)+"')>"+n+"</a></td>",l++,4==l&&(txt+="</tr>",l=1);txt+="</tr></table>",popd.innerHTML=txt}function force_close(div){div2=eval(div),div2.innerHTML=""}function block(data,obj,div){force_close(div),obj2=eval(obj),obj2.value=data}function max_conteudo(t){total=370,tam=t.value.length,str="",str+=tam,Digitado_conteudo.innerHTML=str,Restante_conteudo.innerHTML=total-str,tam>total&&(aux=t.value,t.value=aux.substring(0,total),Digitado_conteudo.innerHTML=total,Restante_conteudo.innerHTML=0)}function validaForm1(){return document.conteudo.titulo.value.length<1?(alert("O campo TÍTULO deverá ser preechido"),conteudo.titulo.focus(),!1):!0}function validaForm2(){return internauta_login.email.value.length<1?(alert("O campo E-MAIL DO USUÁRIO deverá ser preechido"),internauta_login.email.focus(),!1):/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(internauta_login.email.value)?internauta_login.senha.value.length<1?(alert("O campo SENHA DO USUÁRIO deverá ser preechido"),internauta_login.senha.focus(),!1):!0:(alert("E-mail Inválido! Informe novamente o E-mail válido."),internauta_login.email.focus(),!1)}function validaForm3(){return internauta.nome.value.length<1?(alert("O campo NOME DO USUÁRIO deverá ser preechido"),internauta.nome.focus(),!1):internauta.dianascimento.value.length<1?(alert("O campo DIA DE NASCIMENTO deverá ser preechido"),internauta.dianascimento.focus(),!1):internauta.mesnascimento.value.length<1?(alert("O campo DIA DE NASCIMENTO deverá ser preechido"),internauta.mesnascimento.focus(),!1):internauta.email.value.length<1?(alert("O campo E-MAIL DO USUÁRIO deverá ser preechido"),internauta.email.focus(),!1):/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(internauta.email.value)?internauta.senha.value.length<1?(alert("O campo SENHA DO USUÁRIO deverá ser preechido"),internauta.senha.focus(),!1):!0:(alert("E-mail Inválido! Informe novamente o E-mail válido."),internauta.email.focus(),!1)}function validaForm4(){return pauta_login.email.value.length<1?(alert("O campo E-MAIL DO USUÁRIO deverá ser preechido"),pauta_login.email.focus(),!1):/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(pauta_login.email.value)?pauta_login.senha.value.length<1?(alert("O campo SENHA DO USUÁRIO deverá ser preechido"),pauta_login.senha.focus(),!1):!0:(alert("E-mail Inválido! Informe novamente o E-mail válido."),pauta_login.email.focus(),!1)}function validaForm5(){return pauta.nome.value.length<1?(alert("O campo NOME DO USUÁRIO deverá ser preechido"),pauta.nome.focus(),!1):pauta.email.value.length<1?(alert("O campo E-MAIL DO USUÁRIO deverá ser preechido"),pauta.email.focus(),!1):/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(pauta.email.value)?pauta.senha.value.length<1?(alert("O campo SENHA DO USUÁRIO deverá ser preechido"),pauta.senha.focus(),!1):!0:(alert("E-mail Inválido! Informe novamente o E-mail válido."),pauta.email.focus(),!1)}function validaForm6(){return document.conteudo.titulo.value.length<1?(alert("O campo TÍTULO deverá ser preechido"),conteudo.titulo.focus(),!1):!0}function validaForm7(){return document.guia.nome.value.length<1?(alert("O campo BUSCA POR NOME deverá ser preechido"),guia.nome.focus(),!1):!0}function validaForm8(){return document.anuncio.ramo.value.length<1?(alert("O campo RAMO DE ATIVIDADE deverá ser preechido"),anuncio.ramo.focus(),!1):document.anuncio.anunciante.value.length<1?(alert("O campo NOME DO ANUNCIANTE deverá ser preechido"),anuncio.anunciante.focus(),!1):document.anuncio.nome.value.length<1?(alert("O campo SEU NOME deverá ser preechido"),anuncio.nome.focus(),!1):anuncio.email.value.length<1?(alert("O campo E-MAIL deverá ser preechido"),anuncio.email.focus(),!1):/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(anuncio.email.value)?document.anuncio.fone.value.length<1?(alert("O campo SEUS TELEFONES deverá ser preechido"),anuncio.fone.focus(),!1):!0:(alert("E-mail Inválido! Informe novamente o E-mail válido."),anuncio.email.focus(),!1)}function validaForm9(){return""==document.contato.assunto.value?(alert("Você deve Selecionar algum ASSUNTO"),document.contato.assunto.focus(),!1):document.contato.nome.value.length<1?(alert("O campo SEU NOME deverá ser preechido"),contato.nome.focus(),!1):contato.email.value.length<1?(alert("O campo SEU E-MAIL deverá ser preechido"),contato.email.focus(),!1):/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(contato.email.value)?!0:(alert("E-mail Inválido! Informe novamente o E-mail válido."),contato.email.focus(),!1)}function validaForm10(){return document.curriculo.nome.value.length<1?(alert("O campo SEU NOME deverá ser preechido"),curriculo.nome.focus(),!1):curriculo.email.value.length<1?(alert("O campo SEU E-MAIL deverá ser preechido"),curriculo.email.focus(),!1):/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(curriculo.email.value)?!0:(alert("E-mail Inválido! Informe novamente o E-mail válido."),curriculo.email.focus(),!1)}function Apagar_conteudo(t){confirm("Deseja realmente apagar este registro?")&&(location.href="../intranet/cadastro_conteudo/acao_conteudo.asp?acao=Excluir&id="+t)}function Apagar_internautas(t){confirm("Deseja realmente apagar este registro?")&&(location.href="acao_internautas.asp?acao=Excluir&id="+t)}