function form_to_string(myform) { 
var resultado=''; 
for(i=0; i<myform.elements.length; i++) { 
var v=get_element_value(myform.elements[i]); 
if(v) resultado+='&'+myform.elements[i].name+"="+String(v).replace(/&/gi,"%26"); 
} 
return resultado; 
} 
function get_element_value(elm) { 
switch(elm.type){ 
case 'select-one': return elm.options[elm.selectedIndex].value; 
case "checkbox": 
case 'radio': 
if (elm.checked) return elm.value; 
break; 
case "hidden": 
case "text": 
case "textarea": 
case "password": return elm.value; 
} 
} 
function get_XMLHttpRequest() { 
try { return new ActiveXObject("Msxml2.XMLHTTP"); } catch (e) {} 
try { return new ActiveXObject("Microsoft.XMLHTTP"); } catch (e) {} 
try { return new XMLHttpRequest(); } catch(e) {} 
alert("XMLHttpRequest not supported"); 
return null; 
} 
function ajax_load_post(ul,id,myform,id2) { 
ajax_load(ul,id,myform,'POST',id2); 
} 
function ajax_load_get(ul,id,myform,id2) { 
ajax_load(ul,id,myform,'GET',id2); 
} 
function get_actual_pest() { 
var oList = document.getElementById("listPest"); 
for (i=0; i<oList.childNodes.length; i++) { 
node = oList.childNodes[i]; 
if (node.nodeName=="LI" && node.className=="current") 
return node.id.replace("pest",""); 
} 
return false; 
} 
function ajax_load_div(ul,oldpest,inh,loadfg) { 
if(!oldpest && nwPest.length==0) 
newPest(); 
if(!oldpest && nwPest.length>0) 
changePest(document.getElementById("pest"+nwPest.pop()).firstChild); 
locked = 1; 
var pestId = get_actual_pest(); 
if(!ul.match(/\?/)) 
ul += '?'; 
ul += '&tul4=' + pestId; 
ul += '&ajax=1&incs=UTF8&cs=ISO-8859-1&ts=' + sGenNumRandom(); 
if(inh!=null) 
ul += '&inh=1&nor=1'; 
if(loadfg!=null) { 
var parse = ul.match(/\/(\d+)\/\d+\/(\w+)\.html/i); 
if(parse) reload_fgs(parse[2], parse[1]); 
} 
if(ul.match(/kl=[^&]+/i)) 
if(ul.match(/&v=(2[6-9]|17)&/i)) 
ul = ul.replace(/&kl=[^&]+/i,''); 
var key = ul.match(/(&|\?)k=[^&]*/i); 
var tipo = ul.match(/(&|\?)v=[^&]*/i); 
key = (key) ? key[0].replace(/(&|\?)k=/i,'').replace(/\++/g,' ') : ''; 
tipo = (tipo) ? tipo[0].replace(/(&|\?)v=/i,'') : '1'; 
ajax_load(ul,'content' + pestId,'','POST','',unescape(key),tipo); 
return false; 
} 
function reload_fgs(kw,cat) { 
if(!window.a505be02) return; 
var SvsB = (cat==null) ? "SCH" : "BRW" + cat 
var j = window.a505be02.location; 
kw = escape(kw.toUpperCase()); 
var ja = j.href.replace(/%2C(SCH|BRW\d+)%2C([^&]*)/, "%2C" +SvsB+ "%2C" + kw); 
j.href = ja; 
if(window.a9df0b4c) { 
j = window.a9df0b4c.location; 
ja = j.href.replace(/&what=(.*)\/(SCH|BRW\d+)@/, "&what=" + kw + "/" +SvsB+ "@"); 
j.href = ja; 
} 
if(window.a04acee5) { 
j = window.a04acee5.location; 
ja = j.href.replace(/&what=(.*)\/(SCH|BRW\d+)@/, "&what=" + kw + "/" +SvsB+ "@"); 
j.href = ja; 
} 
} 
function ajax_load_search(mform,inh) { 
var ul = mform.action; 
var srch = form_to_string(mform); 
if(srch) ul += '?' + srch; 
if(inh!=null) 
ajax_load_div(ul,false,1); 
else 
ajax_load_div(ul,false); 
reload_fgs(mform.k.value); 
return false; 
} 
function ajax_load_inhigher(mform,home) { 
var j = 0; 
if(home!=null) 
j = 1; 
for (var i=j; i<arrOrder.length; i++) { 
mform.v.value = ""+arrOrder[i]; 
locked = 0; 
ajax_load_search(mform,1); 
} 
var cook = getCookie("OriginInH"); 
var Id = (cook && cook!="8") ? cook : "1"; 
cook = (cook) ? cook : "1"; 
locked = 0; 
changePest(document.getElementById("pest" + eval(arrOrderNum.indexOf(parseInt(Id)) + 1) ).firstChild); 
select_buscador(parseInt(cook)); 
} 
function ajax_load_pest(key, num, type, pestId, Otype, inh) { 
num = (num.length) ? " (" + num.trim() + ")" : ""; 
type = (type.length) ? type.trim() : "1"; 
Otype = (Otype==null) ? "" : Otype.trim(); 
var node = (pestId == null) ? document.getElementById("pest" + get_actual_pest()) : document.getElementById("pest" + pestId); 
switch (type) { 
case "2": 
key = "Imágenes: " + key; 
break; 
case "3": 
key = "Web: " + key; 
break; 
case "4": 
key = "Vídeos: " + key; 
break; 
case "5": 
key = "Noticias: " + key; 
break; 
case "6": 
key = "Negocios: " + key; 
break; 
case "7": 
key = "Blogs: " + key; 
break; 
case "8": 
key = "En tu ciudad: " + key; 
break; 
case "11": 
key = "Vendo: " + key; 
break; 
case "12": 
key = "Compro: " + key; 
break; 
case "13": 
key = "Opiniones: " + key; 
break; 
case "14": 
key = "Usuarios: " + key; 
break; 
default: 
key = "Compras: " + key; 
} 
if(Otype.length && Otype!=type) { 
switch (Otype) { 
case "1": 
key = "Compras (0) &raquo; " + key; 
break; 
case "2": 
key = "Imágenes (0) &raquo; " + key; 
break; 
case "3": 
key = "Web (0) &raquo; " + key; 
break; 
case "4": 
key = "Vídeos (0) &raquo; " + key; 
break; 
case "5": 
key = "Noticias (0) &raquo; " + key; 
break; 
case "6": 
key = "Negocios (0) &raquo; " + key; 
break; 
case "7": 
key = "Blogs (0) &raquo; " + key; 
break; 
case "8": 
key = "En tu ciudad (0) &raquo; " + key; 
break; 
case "11": 
key = "Vendo (0) &raquo; " + key; 
break; 
case "12": 
key = "Compro (0) &raquo; " + key; 
break; 
case "13": 
key = "Opiniones (0) &raquo; " + key; 
break; 
case "14": 
key = "Usuarios (0) &raquo; " + key; 
break; 
} 
} 
if(Otype.length && Otype!=type) type=Otype; 
node.setAttribute("name", node.id + "_" + type); 
if (parseInt(type)>10 && parseInt(type)<15) 
node.firstChild.firstChild.firstChild.className = "cbcom" + type; 
node.firstChild.firstChild.firstChild.innerHTML = key + num; 
loadScroll(); 
if(inh==null) select_buscador(parseInt(type)); 
} 
function load_modulo_resultados_ajax(s,ul,ident,browse,flagver,biblia) { 
if (s) setCookie("ModuloResultados",s,0); 
else s=getCookie("ModuloResultados"); 
if (!s) { 
if (biblia!='') s = "&v=" + flagver + "&v2=10"; 
else return; 
} 
if (browse!='') browse = "&ti=1"; 
if (flagver!='') flagver = "&v=" + flagver; 
ajax_load_get(ul + browse + flagver + s + '&ib=-1&incs=UTF8&cs=ISO-8859-1&tpl=ResultadosBuscaLateral&tplnr=NoHayResultadosLateral&tpler=NoHayResultadosLateral','resultados_busca_'+ident,'',0); 
} 
function Comprar_ajax(numproducto,idpeticion,rproducto,icomercio,ncomercio,uproducto,idproducto,precio,fr,kw,referer,parg) { 
var lNumRand_ajax=sGenNumRandom(); 
for(var z=1;z<=7;z++) { 
try { 
var node = document.getElementById("span"+z+"_producto_"+numproducto+"_"+idpeticion); 
var clase = (node.className.length)? node.className : "resul-nombre"; 
var txt = '<a class="'+clase+'" href="javascript:Comprar(\''+rproducto+'\',\''+icomercio+'\',\''+ncomercio+'\',\''+uproducto+'\',\''+idproducto+'\',\''+precio+'\',\''+lNumRand_ajax+'\','+fr+',\''+kw+'\',\''+referer+'\',\''+parg+'\');">'; 
node.innerHTML = txt + node.innerHTML + "</a>"; 
} catch(err) { } 
} 
} 
function get_name_pest(type) { 
switch (type) { 
case "1": 
return "Compras"; 
break; 
case "27": 
return "Imágenes"; 
break; 
case "26": 
return "Web"; 
break; 
case "28": 
return "Vídeos"; 
break; 
case "29": 
return "Noticias"; 
break; 
case "8": 
return "Negocios"; 
break; 
case "17": 
return "Blogs"; 
break; 
case "19": 
return "Vendo"; 
break; 
case "6": 
return "Compro"; 
break; 
case "20": 
return "Opiniones"; 
break; 
case "22": 
return "Usuarios"; 
break; 
default: 
return "Compras"; 
break; 
} 
} 
function ajax_load(ul,id,myform,method,id2,key,tipo) { 
var load_text = (key!=null&&tipo!=null) ? ( (key.length) ? "Buscando \""+key+"\" en "+get_name_pest(tipo) : "Buscando en "+get_name_pest(tipo) ) : "Cargando ..."; 
var ajax_obj=get_XMLHttpRequest(); 
var obj=document.getElementById(id); 
obj.innerHTML="Conectando ..."; 
set_layer_display(id2,1); 
if (!method) method='POST'; 
ajax_obj.open(method, ul, true); 
ajax_obj.setRequestHeader("Method", method+" "+ ul+" HTTP/1.1"); 
ajax_obj.setRequestHeader("Content-Type", "application/x-www-form-urlencoded"); 
ajax_obj.setRequestHeader("Content-Length", "0"); 
ajax_obj.onreadystatechange=function() { 
/* 0: Uninitizalized, 1: Loading, 2: Loaded, 3: Interactive, 4: Finished */ 
if (ajax_obj.readyState==1) obj.innerHTML="<div style=\"margin:10px;margin-left:20px;padding:10px 0 12px 25px;background:url(/share-imgs/loading.gif) no-repeat left center;\"><span class=\"resul-nombre\">"+load_text+"</span></div>"; 
else if (ajax_obj.readyState==4) { 
try { 
if (ajax_obj.status>=400 || ajax_obj.responseText=='') { 
set_layer_display(id2,0); 
//alert("Error cargando AJAX: "+ul+" => "+ajax_obj.status); 
} 
else { 
obj.innerHTML=ajax_obj.responseText; 
ajax_eval_js(ajax_obj.responseText); 
//set_layer_display(id2,1); 
} 
locked = 0; 
} catch(e) {locked = 0;} 
} 
} 
if(myform=="[object HTMLFormElement]" || (myform=="[object]" && myform.elements)) ajax_obj.send(form_to_string(myform)); 
else ajax_obj.send(myform); 
} 
function ajax_eval_js(txt) { 
var ScriptFragment='(?:<script.*?>)((\n|\r|.)*?)(?:</script>)'; 
var match=new RegExp(ScriptFragment, 'img'); 
var scripts=txt.match(match); 
if (scripts) { 
var js=''; 
for(var s=0;s<scripts.length;s++) { 
var match=new RegExp(ScriptFragment, 'im'); 
js+=scripts[s].match(match)[1]+'\n'; 
} 
//alert(js); 
eval(js); 
} 
}
