function fetchtable()
{
  data   = document.tables.data.value;
  border = getradiostring(document.tables.border);
  shade  = getradiostring(document.tables.shade);
  align  = getradiostring(document.tables.align);
  delim  = getradiostring(document.tables.delim);
  bcolor = document.tables.bcolor.value;
  scolor = document.tables.scolor.value;

  parameters = 'data='+escape(data);
  parameters+= '&border='+border;
  parameters+= '&shade='+shade;
  parameters+= '&align='+align;
  parameters+= '&delim='+delim;
  parameters+= '&bcolor='+bcolor;
  parameters+= '&scolor='+scolor;

  document.getElementById("code").innerHTML = parameters;
  rpc("table-ajax.php",parameters,"code", "preview");

  return false;
}

function getradiostring(field)
{
  for (i=0;i<field.length;i++) {
    if (field[i].checked) {
      return field[i].value;
    }
  }
  return '';
}

function rpc(url, parameters, id1, id2)
{
  var xmlHttp;

  try
  {
    // Firefox, Opera 8.0+, Safari
    xmlHttp=new XMLHttpRequest();
  }
  catch (e)
  {
    // Internet Explorer
    try
    {
      xmlHttp=new ActiveXObject("Msxml2.XMLHTTP");
    }
    catch (e)
    {
      try
      {
        xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");
      }
      catch (e)
      {
        document.getElementById(id1).innerHTML = "Fail";
        return false;
      }
    }
  }

  xmlHttp.onreadystatechange=function()
  {
    if(xmlHttp.readyState==4) {
      document.getElementById(id1).value = xmlHttp.responseText;
      document.getElementById(id2).innerHTML = nl2br(xmlHttp.responseText);
    }
  }

  xmlHttp.open("POST",url,true);
  xmlHttp.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
  xmlHttp.send(parameters);
  xmlHttp.send(null);
  return true;
}

function nl2br(text){
  text = escape(text);
  if(text.indexOf('%0D%0A') > -1){
    re_nlchar = /%0D%0A/g ;
  }else if(text.indexOf('%0A') > -1){
    re_nlchar = /%0A/g ;
  }else if(text.indexOf('%0D') > -1){
    re_nlchar = /%0D/g ;
  }
  return unescape( text.replace(re_nlchar,'<br />') );
}