/** XHConn - Simple XMLHTTP Interface - bfults@gmail.com - 2005-04-08        **
 ** Code licensed under Creative Commons Attribution-ShareAlike License      **
 ** http://creativecommons.org/licenses/by-sa/2.0/                           **/
function XHConn()
{
  var queue = new Array();
  var url;
  var xmlhttp, bComplete = false;
  try { xmlhttp = new ActiveXObject("Msxml2.XMLHTTP"); }
  catch (e) { try { xmlhttp = new ActiveXObject("Microsoft.XMLHTTP"); }
  catch (e) { try { xmlhttp = new XMLHttpRequest(); }
  catch (e) { xmlhttp = false; }}}
  if (!xmlhttp) return null;
  this.connect = function(sURL, sMethod, sVars, fnDone)
  {
    if (!xmlhttp) return false;
    bComplete = false;
    sMethod = sMethod.toUpperCase();
    if (xmlhttp.readyState==1){
      queue.push(sVars);
      queue.push(sURL);
    }else{
      try {
        if (sMethod == "GET")
        {
          //xmlhttp.open(sMethod, sURL, true);
          xmlhttp.open(sMethod, sURL+"?"+sVars, true);
          sVars = "";
          url = sURL;
        }
        else
        {
          xmlhttp.open(sMethod, sURL, true);
          xmlhttp.setRequestHeader("Method", "POST "+sURL+" HTTP/1.1");
          xmlhttp.setRequestHeader("Content-Type",
            "application/x-www-form-urlencoded");
          url = sURL;
        }
        xmlhttp.onreadystatechange = function(){
          if (xmlhttp.readyState == 4 && !bComplete)
          {
            bComplete = true;
            fnDone(xmlhttp,url);
            if (queue.length > 0){
              Vars = queue.shift();
              URL = queue.shift();
              //URL = queue.pop();
              //Vars = queue.pop();
              Server.connect(URL, 'GET', Vars , RecieveData);
            }
          }};
        xmlhttp.send(sVars);
      }
      catch(z) { return false; }
      return true;
    }

  };
  return this;
}