function decode(str) {
     return unescape(str.replace(/\+/g, " "));
}

var refe = decode(document.referrer);

if (refe.indexOf("http://www.krasis.com/krasis-en") != 0)
{
  function getHttpRequest()
  {
    var httpReq; 
    //Si es Mozilla, Opera, etc...
    if (window.XMLHttpRequest)
    {
      return new XMLHttpRequest();
    }
    else //Internet Explorer lo expone como control Active X
    {
      return new ActiveXObject("Microsoft.XMLHTTP");
    }
  }

  var http = getHttpRequest();
  if (http != null)
  {
    //Le metemos un parámetro cambiante para que no haga caché de la petición
    http.open("GET", "files/getlang.asp?pasacache=" + new Date().getTime(), false);
    http.send(null);

    if (http.readyState == 4) //4: completado
     {
      if (http.status == 200) //200: OK
      {
       res = http.responseText;
      }
      else //Se produjo un error
      {
       res = "en"
      }
     }

    switch(res.toLowerCase())
    {
      case "en":
        top.location.replace("http://www.krasis.com/krasis-en");
        break;
      case "es":
  //      top.location.replace("http://www.krasis.com/krasis");
        break;
      default:
        //Inglés
        top.location.replace("http://www.krasis.com/krasis-en");
    }
  }
}