function AddAjax()
{
  var ajaxs = ["Msxml2.XMLHTTP","Msxml2.XMLHTTP.4.0","Msxml2.XMLH TTP.5.0","Msxml2.XMLHTTP.3.0","Microsoft.XMLHTTP"];
	var objAjax = false;
	for(var i=0 ; !objAjax && i<ajaxs.length ; i++)
	{
		try{ objAjax = new ActiveXObject(ajaxs[i]); }
		catch(e) { objAjax = false; }
	}

  if(!objAjax && typeof XMLHttpRequest!='undefined')
  {
    objAjax=new XMLHttpRequest();
  }

  return objAjax;
}

function sqlAjax(web,sql)
{
	var pagphp=web;

  var sql=sql.split("/");
  var capa=sql[0];
  var funcion=sql[2];
  sql=SepSql(sql[1]);

  if (sql==false) alert ("Error"+sql); 
  if (funcion==undefined)
		var EsFuncion=false;
	else
		var EsFuncion=true;

  var MiAjax=AddAjax();
  MiAjax.open("POST",pagphp,true);

  MiAjax.onreadystatechange=function()
  {
    switch(MiAjax.readyState)
    {
      case 1: break;// Cargando
      case 2: break;//Conexion Establecida
      case 3: break;//Recibiendo Respuesta
      case 4: if (MiAjax.status==200)//Finalizado
              {
                var res=MiAjax.responseText;
                if (EsFuncion)
                {
									GId(capa).innerHTML=res;
                  eval(funcion);
                }
                else
                {
                  posfun=res.indexOf("VerMsg");
                  if (posfun==-1)
                  {
                    GId(capa).innerHTML=res;
                  }
                  else
                  {
                    GId(capa).innerHTML=res.substr(0,posfun);
                    msg=res.substr(posfun);
                    eval(msg);
                  }
                }
              }
							else
							{
              	if (MiAjax.status==404)
              		GId(capa).innerHTML="No existe la pagina :"+pagphp+" length="+pagphp.length+" ="+MiAjax.status;
								else
									GId(capa).innerHTML= "Error: "+MiAjax.status; 
							}
              break;
    }

  }
//
 MiAjax.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
 MiAjax.send(sql);
//
//  MiAjax.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded;charset=ISO-8859-1');

}

function SepSql(datos)
{
  var datos=datos.split(",");
  var sql="";
  for (c=0;c<datos.length;c++)
  {
    var obj=GId(datos[c]);
    if (obj)
    {
      with (obj)
      {
        switch(type)
        {
          case "text":
                sql=sql+name+"="+value;
                break;
          case "select-one":
                if (selectedIndex==-1)
                {
                  alert ("Error:"+name+" "+sql+"=>"+c+"=>"+datos[c]);
                  return false;
                }
                sql=sql+name+"="+options[selectedIndex].value;
                break;

          case "select-multiple":
                valor="";
                for (k=0;k<obj.length-1;k++) valor=valor+obj.item(k).value+",";
                valor=valor+obj.item(k).value
                sql=sql+name+"="+valor;
              break;

          case "hidden":
                sql=sql+name+"="+value;
                break;

          case "textarea":
                sql=sql+name+"="+value;
                break;

          case "button":
                sql=sql+name+"="+value;
                break;

          default : document.write (name+"="+type);
        }
      }
      if (c<(datos.length-1)) sql=sql+"&";
    }
    else
    {
      alert ("Error:"+sql+"=>"+c+"=>"+datos[c]);
    }
  }

  return sql;
}