function select_innerHTML(objeto,innerHTML){
/******
* select_innerHTML - corrige o bug do InnerHTML em selects no IE
* Veja o problema em: http://support.microsoft.com/default.aspx?scid=kb;en-us;276228
* Versã 2.1 - 04/09/2007
* Autor: Micox - Náon José. Guimarã - micoxjcg@yahoo.com.br
* @objeto(tipo HTMLobject): o select a ser alterado
* @innerHTML(tipo string): o novo valor do innerHTML
*******/
    objeto.innerHTML = ""
    var selTemp = document.createElement("micoxselect")
    var opt;
    selTemp.id="micoxselect1"
    document.body.appendChild(selTemp)
    selTemp = document.getElementById("micoxselect1")
    selTemp.style.display="none"
    if(innerHTML.toLowerCase().indexOf("<option")<0){//se nãéption eu converto
        innerHTML = "<option>" + innerHTML + "</option>"
    }
    innerHTML = innerHTML.toLowerCase().replace(/<option/g,"<span").replace(/<\/option/g,"</span")
    selTemp.innerHTML = innerHTML
      
    
    for(var i=0;i<selTemp.childNodes.length;i++){
  		var spantemp = selTemp.childNodes[i];
        if(spantemp.tagName){     
            opt = document.createElement("OPTION")
   			if(document.all) { //IE
    			objeto.add(opt)
   			}
			else{
    			objeto.appendChild(opt)
   			}       
    
			//getting attributes
   			for(var j=0; j<spantemp.attributes.length ; j++){
    			var attrName = spantemp.attributes[j].nodeName;
    			var attrVal = spantemp.attributes[j].nodeValue;
    			if(attrVal){
     				try{
      					opt.setAttribute(attrName,attrVal);
      					opt.setAttributeNode(spantemp.attributes[j].cloneNode(true));
     				}catch(e){}
    			}
   			}
   			//getting styles
   			if(spantemp.style){
    			for(var y in spantemp.style){
     				try{opt.style[y] = spantemp.style[y];}catch(e){}
    			}
   			}
   			//value and text
   			opt.value = spantemp.getAttribute("value")
			opt.value = opt.value.toUpperCase();
   			opt.text = spantemp.innerHTML
			opt.text = opt.text.toUpperCase();
   			//IE
   			opt.selected = spantemp.getAttribute('selected');
   			opt.className = spantemp.className;
  		} 
 	}    
 	document.body.removeChild(selTemp)
 	selTemp = null
}

// Shorter version of the function posted by someone
//function select_innerHTML(select, inner) {
//select.outerHTML = select.outerHTML.substring(0, select.outerHTML.indexOf(')', 0) + 1) + inner + '(/select)';
//}