<!--
// 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;
}


// -->


