// Verificar qual navegador
function QualNavegador(){
	var s = navigator.appName;
	if ( s == "Microsoft Internet Explorer" )
		return "IE";
	else if ( s == "Netscape" )
		return "NE";
	else
		return "";
}

// Verificar qual a versￜ do navegador
function QualVersao(){
	var s = navigator.appVersion;
	if ( QualNavegador() == "IE" )
	{
		var i = s.search("MSIE");
		s=s.substring(i+5);
		i=s.search(".");
		return parseInt(s.substring(0,i+1));
	}
	else if ( QualNavegador() == "NE" )
		return parseInt(s.substring(0,1));
	else
		return 0;
}

//	cria_elemento ("pai", "elemento", "name", "valores", "innerHTML");
/*
função que faz a criação dinâmica de um componente html
*/
function cria_elemento_new (pai, elemento, name, valores, inner)
{
	var i = 0;
	var aux;
	var nome = (name != "")? " name = '"+name + "' id = '"+name+"'" : "";

	if(QualNavegador() == "IE"){
		var aux = document.createElement("<"+elemento+" "+nome+" "+valores+">")
	}
	else{
		if(elemento != "option"){
			var aux = document.createElement(elemento);
			aux.id = name;
			aux.name = name;

			while(valores != ""){
				var ret = pega_primeira_palavra(valores);
				valores = ret[0];
//alert("fora || frase "+ret[0]+" -> tipo |"+(ret[1].toLowerCase())+"|");
				switch(ret[1].toLowerCase()){
					case 'type':
					case 'value':
					case 'size':
					case 'align':
					case 'src':
					case 'title':
						var tipo = ret[1].toLowerCase();
//alert(tipo);
						var ret = pega_primeira_palavra(valores);
						valores = ret[0];
						var ret = pega_primeira_palavra(valores);
//alert("dentro '"+tipo+"' || "+ret[0]+" -> "+ret[1]+" || comando = |"+"aux."+tipo+" = '"+ret[1]+"';"+"|");
						eval("aux."+tipo+" = '"+ret[1]+"';");
						valores = ret[0];
					break;
					case 'style':
						var ret = pega_primeira_palavra(valores);
						valores = ret[0];
						var ret = pega_primeira_palavra(valores);
						valores = ret[0];
						var valores2 = ret[1];
//alert("valores2 = "+valores2);
						while(valores2 != ""){
							var ret = pega_primeira_palavra(valores2);
							valores2 = ret[0];
							var pos = ret[1].search(":");
//alert("aux.style."+ret[1].substr(0, pos)+" = '"+ret[1].substr(pos+1, ret[1].length)+"'");
							eval("aux.style."+ret[1].substr(0, pos)+" = '"+ret[1].substr(pos+1, ret[1].length)+"'");
						}
					break;
					case 'bgcolor':
						var ret = pega_primeira_palavra(valores);
						valores = ret[0];
						var ret = pega_primeira_palavra(valores);
//alert("dentro 'bgcolor' || "+ret[0]+" -> "+ret[1]);
						valores = ret[0];
						aux.bgColor = ret[1];
					break;
					case 'colspan':
						var ret = pega_primeira_palavra(valores);
						valores = ret[0];
						var ret = pega_primeira_palavra(valores);
//alert("dentro 'colspan' || "+ret[0]+" -> "+ret[1]);
						valores = ret[0];
						aux.colSpan = ret[1];
					break;
					case 'rowspan':
						var ret = pega_primeira_palavra(valores);
						valores = ret[0];
						var ret = pega_primeira_palavra(valores);
//alert("dentro 'rowspan' || "+ret[0]+" -> "+ret[1]);
						valores = ret[0];
						aux.rowSpan = ret[1];
					break;
					case 'maxlength':
						var ret = pega_primeira_palavra(valores);
						valores = ret[0];
						var ret = pega_primeira_palavra(valores);
//alert("dentro 'maxlength' || "+ret[0]+" -> "+ret[1]);
						valores = ret[0];
						aux.maxLength = ret[1];
					break;
					case 'class':
						var ret = pega_primeira_palavra(valores);
						valores = ret[0];
						var ret = pega_primeira_palavra(valores);
//alert("dentro 'class' || "+ret[0]+" -> "+ret[1]);
						valores = ret[0];
						aux.className = ret[1];
					break;
					case 'readonly':
//alert("dentro 'class' || "+ret[0]+" -> "+ret[1]);
						valores = ret[0];
						aux.readOnly = ret[1];
					break;
					case 'nowrap':
//alert("dentro 'class' || "+ret[0]+" -> "+ret[1]);
						valores = ret[0];
						aux.nowRap = ret[1];
					break;
					case 'disabled':
//alert("dentro 'class' || "+ret[0]+" -> "+ret[1]);
						valores = ret[0];
						aux.disabled = ret[1];
					break;
					case 'onclick':
					case 'onchange':
					case 'onblur':
					case 'onfocus':
						var tipo = ret[1];
						var ret = pega_primeira_palavra(valores);
						valores = ret[0];
						var ret = pega_primeira_palavra(valores);
//alert("dentro "+tipo+" -> "+ret[1]);
						valores = ret[0];
						aux.setAttribute(tipo, ret[1]);
					break;
					default:
						valores = "";
				}

				i++;
			}
		}
		else{
			var aux = document.createElement(elemento);
			aux.id = name;

			if(valores.search("value") != -1){
				valores = valores.substr(valores.search("value"));
				valores = valores.substr(valores.search("="));
				valores = valores.substr(valores.search("'")+1);
				valores = valores.substring(0, valores.search("'"));
			}
			aux.value = valores;
		}
	}

	if(inner != ""){
		aux.innerHTML += inner;
	}

	pai.appendChild(aux);

	return aux;
}

//	cria_elemento ("pai", "elemento", "name", "valores", "innerHTML");
/*
função que faz a criação dinâmica de um componente html
*/
function cria_elemento (pai, elemento, name, valores, inner)
{
	var nome = (name != "")? " id = '"+name+"' name = '"+name + "'" : "";

	if(QualNavegador() == "IE"){
		var aux = document.createElement("<"+elemento+" "+nome+" "+valores+">")
	}
	else{
		switch(elemento.toLowerCase()){
			case "tr":
				var aux = document.createElement(elemento);
				aux.id = name;
				aux.name = name;
			break;
			case "option":
				var aux = document.createElement(elemento);
				aux.id = name;

				if(valores.search("selected") != -1){
					aux.selected = true;
				}

				if(valores.search("value") != -1){
					valores = valores.substr(valores.search("value"));
					valores = valores.substr(valores.search("="));
					valores = valores.substr(valores.search("'")+1);
					valores = valores.substring(0, valores.search("'"));
				}
				aux.value = valores;
			break;
			default:
				pai.innerHTML += "<"+elemento+" "+nome+" "+valores+">";
				var aux = document.getElementById(name);
		}
	}

	if(inner != ""){
		aux.innerHTML += inner;
	}

	pai.appendChild(aux);

	return aux;
}