//----- Begin include-bestand "Cookies.inc": -----

//------ CookieAanmaken(): ---------------------------------
/* Maakt een cookie aan.
In:   Naam:     Naam waaronder het cookie wordt opgeslagen (string)
      Waarde:   Waarde van het cookie (string)
      ExpDagen: Gewenste levensduur in dagen (integer)
                Indien nul: tot einde sessie
Uit:  Resulterende waarde, teruggelezen na opslaan (string)
*/
function CookieAanmaken (Naam, Waarde, ExpDagen)
{
  var Vervaldtm = "";
  var URL = "/jada2007/";
  if (ExpDagen)
  {
    var Dtm = new Date();
    Dtm.setTime (Dtm.getTime() + (ExpDagen * 24 * 60 * 60 * 1000));	// (tijd in ms)
    Vervaldtm += "expires=" + Dtm.toUTCString();
  }
  document.cookie = Naam + "=" + Waarde + "; " + Vervaldtm +"; path=" + URL;
  return (CookieLezen (Naam));

}    // CookieAanmaken()

//------ CookieLezen(): --------------
/* Leest een cookie uit.
In:   Naam: naam waaonder het cookie is opgeslagen (string)
Uit:  Waarde van het cookie (string), of 0 indien cookie niet gevonden
*/
function CookieLezen(Naam)
{
  var NaamIs = Naam + "=";
  var Ck, i, j, L;
  var CkArr = document.cookie.split(';');
  for(i = 0; i < CkArr.length; i++)
  {
    Ck = CkArr[i];
    L = Ck.length;
    for (j = 0; j < L; j++)
    {
      if (Ck.charAt(j) != " ")
      {
        Ck = Ck.substring (j, L);
        if (Ck.indexOf (NaamIs) == 0)
        {
          return (Ck.substr (NaamIs.length, Ck.length));
        }
      }
    }
  }
  return (0);
}    // CookieLezen()

//----- CookieVerwijderen (): -----
/* Verwijdert een cookie door het vervaltijdsatip op 24 uur geleden te zetten.
In:   Naam: naam waaonder het cookie is opgeslagen (string)
Uit:  --
*/
function CookieVerwijderen (Naam)
{
  CookieAanmaken(Naam, "", -1);
}    // CookieVerwijderen()

//------ CookiesTesten (): ------
function CookiesTesten ()
{
  var Ck1 = "abcdefgh";
  var Ck2 = "12345678";
  CookieAanmaken ("Ck1", Ck1, 0);
  CookieAanmaken ("Ck2", Ck2, 0);
  var TCk1 = CookieLezen ("Ck1", Ck1, 0);
  var TCk2 = CookieLezen ("Ck2", Ck2, 0);
  if ((TCk1 != Ck1) || (TCk2 != Ck2))
  {
    alert ("Attentie!\n" +
           "Uw browser blijkt geen \"cookies\" te accepteren. Wellicht hebt u deze functie " +
           "uitgeschakeld? Hierdoor zullen bepaalde gedeeltes van deze website niet goed werken.\n" +
           "\n" +
           "Voor een goede werking van deze website zijn cookies noodzakelijk. Zie zo nodig de " +
           "hulppagina\'s van uw browser voor informatie over hoe u de cookies weer kunt inschakelen, " +
           "aangezien dit per browser verschilt.");
  }
  else
  {
    CookieVerwijderen (Ck1);
    CookieVerwijderen (Ck2);
  }
}    // CookiesTesten ()

CookiesTesten();              // in-line uitvoeren!

//------------------------

//- - - - -  Einde include-bestand "Cookies.inc"  - - - - -