window.onload=rollup; function rollout(objMenuitem, objEvent) { // Some keyhandling stuff if (objEvent && objEvent.type == 'keypress') { if (objEvent.keyCode) var iKeyCode = objEvent.keyCode; else if (objEvent.which) var iKeyCode = objEvent.which; // If it's not the enter key or space key, // pass control back to the browser if (iKeyCode != 13 && iKeyCode != 32) return true; } if (objMenuitem.nextSibling.nextSibling.style.display == 'block') var strDisplayMode = 'none'; else var strDisplayMode = 'block'; // Rollup nested lists that are still open var objMenu = document.getElementById('mainnav'); var objNested = objMenu.getElementsByTagName('ul'); for (var i=0; i 0) strPlace = strPlace.substring(0, iPos); var strRegExp = "\\b" + strPlace; var objChart = document.getElementById('distchart'); var objGrid = objChart.getElementsByTagName('td'); for (var iCounter=0; iCounter

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'res'

/inc/menu.js.asp, line 219