function res(t, v) {
    var txt = "";
    var w = "";
    for (i=0; i < t.value.length; i++) {
        x = t.value.charAt(i);
        if (v.value == null) {
            if (v != null) {
                txt = v;
            }
            else
                txt = "";
        }
        else
            txt = v.value;

        if (txt.indexOf(x, 0) != -1)
            w += x;
        
    }
    t.value = w;
}
function checaeMail(emailStr) {
    var emailPat=/^(.+)@(.+)$/
    var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
    var validChars="\[^\\s" + specialChars + "\]"
    var quotedUser="(\"[^\"]*\")"
    var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
    var atom=validChars + '+'
    var word="(" + atom + "|" + quotedUser + ")"
    var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
    var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")
            
    var matchArray=emailStr.match(emailPat)
    if (matchArray==null) {
        alert("Endereço de email incorreto (verifique os simbolos @ e .)")
	    return false
    }
    var user=matchArray[1]
    var domain=matchArray[2]

    if (user.match(userPat)==null) {
        alert("O usuário de email não é válido.")
        return false
    }

    var IPArray=domain.match(ipDomainPat)
    if (IPArray!=null) {
       for (var i=1;i<=4;i++) {
            if (IPArray[i]>255) {
	            alert("Endereço de IP deste email é inválido!")
		        return false
	        }
        }
        return true
    }

    var domainArray=domain.match(domainPat)
    if (domainArray==null) {
	    alert("O dominio de seu email não é válido.")
        return false
    }

    var atomPat=new RegExp(atom,"g")
    var domArr=domain.match(atomPat)
    var len=domArr.length
    if (domArr[domArr.length-1].length<2 || 
        domArr[domArr.length-1].length>3) {
        alert("O endereço de dominio do seu email, ou a descrição de seu pais não é valido (.br)")
        return false
    }

    if (len<2) {
        var errStr="O endereço de seu servidor de email não pode ser encontrado!"
        alert(errStr)
        return false
    }

    return true;
}
function readCookie(name) {
    var nameEQ = name + "=";
	var ca = document.cookie.split(';');
    for(var i=0;i < ca.length;i++) {
	    var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
        if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
	}
    return null;
}
function Set_Cookie( name, value, expires, path, domain, secure ) {   
    var today = new Date();   
    today.setTime( today.getTime() );   
  
    if ( expires ){   
        expires = expires * 1000 * 60 * 60 * 24;   
    }   
    var expires_date = new Date( today.getTime() + (expires) );   
  
    document.cokie = name + "=" +escape( value ) + ((expires) ? ";expires=" + expires_date.toGMTString() : "" );   
}