//
// (C) K.Pijpstra 2000
// 

function QueryString(ADocument) {
  if(ADocument)A=ADocument.URL.split("?");
  else A=document.URL.split("?");
  if(A.length>1) return A[A.length-1];
  else return "";
}

function QueryDocumentName(ADocument) {
  if(ADocument)A=ADocument.URL.split("?");
  else A=document.URL.split("?");
  return A[0];
}

function QueryValue(Query,KeyName) {
  if(Query==null)Query=QueryString(window.document);
  A = Query.split("&");
  for (var I=0; I < A.length; I++) {
    if(A[I].substr(0,KeyName.length+1).toLowerCase()==(KeyName.toLowerCase()+"=")){
      A=A[I].split("=");
      return A[1];
      break; 
    }
  }
}

function QueryReplace(Query,KeyName,Value) {
  IsEr=false;
  if(Query==null)var S=new String(QueryString(window.document));
  else var S=new String(Query);

  if(S!=""){
    var A = S.split("&");
    var IsEr=false;
    for (var I=0; I < A.length; I++) {
      if(A[I].substr(0,KeyName.length+1).toLowerCase()==(KeyName.toLowerCase()+"=")){
        A[I]=KeyName+"="+Value;
        IsEr=true;
        break; 
      }
    }
    if(IsEr==true)return A.join("&");
    else return A.join("&")+"&"+KeyName+"="+Value;
  }
  else return KeyName+"="+Value;
}