<!--

// Author: Jeroen Messing (jeroen@armedia.nl)



var da = (document.all) ? 1 : 0;

var pr = (window.print) ? 1 : 0;

var mac = (navigator.userAgent.indexOf("Mac") != -1);



self.focus();



function printMe()

{

  printThis();

  return false;

}





function printThis()

{

  if (pr) { // NS4, IE5

    window.print();

  } else if (da && !mac) { // IE4 (Windows)

    setTimeout("vbPrintPage();", 100);    //vbPrintPage();

  } else { // other browsers

    alert("Sorry, your browser doesn't support this feature.");

  }

}



function printFrame(frame)

{

  if (pr && da)

  { // IE5

    frame.focus();

    window.print();

    link.focus();

  }

  else if (pr)

  { // NS4

    frame.print();

  }

  else if (da && !mac)

  { // IE4 (Windows)

    frame.focus();

    setTimeout("vbPrintPage(); link.focus();", 100);

  }

  else

  { // other browsers

    alert("Sorry, your browser doesn't support this feature.");

  }

}



if (da && !pr && !mac) with (document) {

  writeln('<OBJECT ID="WB" WIDTH="0" HEIGHT="0" CLASSID="clsid:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>');

  writeln('<' + 'SCRIPT LANGUAGE="VBScript">');

  writeln('Sub window_onunload');

  writeln('  On Error Resume Next');

  writeln('  Set WB = nothing');

  writeln('End Sub');

  writeln('Sub vbPrintPage');

  writeln('  OLECMDID_PRINT = 6');

  writeln('  OLECMDEXECOPT_DONTPROMPTUSER = 2');

  writeln('  OLECMDEXECOPT_PROMPTUSER = 1');

  writeln('  On Error Resume Next');

  writeln('  WB.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_PROMPTUSER');

  writeln('End Sub');

  writeln('<' + '/SCRIPT>');

}



function setRightMenu()

{

  // Author: Raymond M. Smit (raymond@armedia.nl)

  // set right frame 'menurechts' afhankelijk van inhoud 'pres'-frame

  var prLoc = "" + top.frames['kaart'].location;

  var rmLoc = "";

  var slashrpos = 0;

  var i = prLoc.length - 1;

  while (i>=0)

  {

    if (prLoc.substring(i,i+1) == "/") { slashrpos = i; i = 0}

    i--;

  }

  rmLoc = "kaart.htm" +  prLoc.substring(slashrpos+1,prLoc.length);

  top.frames['kaart'].location = rmLoc;

  return false;

}





// -->




