function ValueOfCookie (ItemPosition) {
   var iLen = document.cookie.indexOf(";", ItemPosition)
   if (iLen == -1)
      iLen = document.cookie.length;
   return unescape(document.cookie.substring(ItemPosition, iLen));
}

function ReadFromCookie(ItemName) {
   var RetVal = null;
   var ItemRef = ItemName + "=";
   var iPosLastChar = document.cookie.length - ItemRef.length;
   var i = 0;
   while (i < iPosLastChar) {
      var j = i + ItemRef.length;
      if (document.cookie.substring(i,j) == ItemRef) {
         RetVal = ValueOfCookie(j);
         break;
      }
      i = document.cookie.indexOf(" ",i) + 1;
      if (i == 0) break;
   }
   return RetVal;
}

function WriteToCookie ( ArgName, ArgValue ) {
   var ArgumentValues = WriteToCookie.arguments;
   var iNrArguments = WriteToCookie.arguments.length;
   var dtExpireDate = (iNrArguments > 2) ? ArgumentValues[2] : null;
   var Path = (iNrArguments > 3) ? ArgumentValues[3] : null;
   var Domain = (iNrArguments > 4) ? ArgumentValues[4] : null;
   var Secure = (iNrArguments > 5) ? ArgumentValues[5] : false;
   document.cookie = ArgName + "=" + escape(ArgValue)  +
      ((dtExpireDate == null) ? "" : ("; expires="+dtExpireDate.toGMTString())) +
      ((Path == null) ? "" : ("; path="+Path)) +
      ((Domain == null) ? "" : ("; domain="+Domain)) +
      ((Secure == true) ? "; secure" : "" );
}