function crearRequestObj(funcionR) {

  var xmlhttp=false;

  /* ie */

/*@cc_on
   @if (@_jscript_version >= 5)
    try {
      xmlhttp = new ActiveXObject("Msxml2.XMLHTTP");
    }
    catch (e) {
      try {
        xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
      }
      catch (e2) {
        xmlhttp = false;
      }
    }
   @elif (@_jscript_version >= 4)
   @else
   @end
@*/
  
  /* moz */

  if (!xmlhttp && typeof XMLHttpRequest!='undefined') {
  	 try {
		    xmlhttp = new XMLHttpRequest();
	   } 
    catch (e) {
		    xmlhttp=false;
	   }
  }

  if (!xmlhttp && window.createRequest) {
	   try {
    		xmlhttp = window.createRequest();
   	}
    catch (e) {
		    xmlhttp=false;
    }
  }
  
  if(xmlhttp) { /* activex no comp a obj bool, solo ref null */
    if(typeof funcionR == "function") {
      xmlhttp.onreadystatechange = funcionR;
    }
  }

  return xmlhttp;
}

function basicoTrim(cadena) {
  return cadena.replace(/\s+$/,"").replace(/^\s+/,"")
}