
	/***********************************************
	* AnyLink Drop Down Menu- © Dynamic Drive (www.dynamicdrive.com)
	* This notice MUST stay intact for legal use
	* Visit http://www.dynamicdrive.com/ for full source code
	***********************************************/
	
	//Contents for menu 1
			var menu1=new Array()
			
			menu1[0]='<a href="http://www.hkprog.com/programming.htm" class="nav">Customizations</a><br /><br />'
			//Contents for menu 2
			var menu2=new Array()
			menu2[0]='<a href="http://www.hkprog.com/vpasp/vpasptechnical.htm" class="nav">VP-ASP shopping Cart</a><br /><br />'
			menu2[1]='<a href="http://www.hkprog.com/vpasp/" class="nav">VP-ASP enhancements</a><br /><br />'
      menu2[2]='<a href="http://www.hkprog.com/vpasp/guide.htm" class="nav">Guide to VP-ASP manuals</a><br /><br />'
			
			menu2[3]='<a href="http://www.hkprog.com/vpasp/paywithpoints.htm" class="nav">Pay with Points</a><br /><br />'
					
			menu2[4]='<a href="http://www.hkprog.com/vpasp/shipping.htm" class="nav">Shipping Calculator</a><br /><br />'
			
			
			//Contents for menu 3
			var menu3=new Array()
			
			menu3[0]='<a href="http://www.hkprog.com/afh/index.htm" class="nav">Advanced Form Handling</a><br /><br />'
			
			menu3[1]='<a href="http://www.hkprog.com/afh/technical.htm" class="nav">Technical Overview</a><br /><br />'
			
			menu3[2]='<a href="http://www.hkprog.com/afhdownload/index.htm" class="nav">Down Load</a><br /><br />'
			
			menu3[3]='<a href="http://www.hkprog.com/afhdemo/index.htm" class="nav">Online Demo</a><br /><br />'
			
			menu3[4]='<a href="http://www.hkprog.com/downloaddocs/afhusersguide.pdf" class="nav">User Guide</a><br /><br />'
			menu3[5]='<a href="http://www.hkprog.com/afh/afhfaq.htm" class="nav">FAQ</a><br /><br />'
			
			
			//Contents for menu 4
			var menu4=new Array()
			menu4[0]='<a href="http://www.hkprog.com/vpasp/databasebackup.htm" class="nav">Database Backup</a><br /><br />'
				
			//Contents for menu 5
			var menu5=new Array()
			
			menu5[0]='<a href="http://www.hkprog.com/support.htm" class="nav">Support Options</a><br /><br />'
			
			menu5[1]='<a href="http://www.hkprog.com/helpdesk" class="nav">Help Desk</a><br /><br />'
			
			menu5[2]='<a href="http://www.hkprog.com/forum" class="nav">Customer Forum</a><br /><br />'
			
			menu5[3]='<a href="http://www.hkprog.com/contact.htm" class="nav">Contact us</a><br /><br />'
			menu5[4]='<a href="http://www.hkprog.com/links.htm" class="nav">Other ASP Sites</a><br /><br />'
			
			//Contents for menu 6
			var menu6=new Array()
			
			menu6[0]='<a href="http://www.hkprog.com/saleshk/shopdisplayproducts.asp" class="nav">All Products</a><br /><br />'
			menu6[1]='<a href="http://www.hkprog.com/saleshk/shopdisplayproducts.asp?id=5" class="nav">Database Backup</a><br /><br />'
			menu6[2]='<a href="http://www.hkprog.com/afh/purchase.htm" class="nav">Advanced Form Handling</a><br /><br />'
			menu6[3]='<a href="http://www.hkprog.com/vpasp/purchase.htm" class="nav">VP-ASP Products</a><br /><br />'
						
			//Contents for menu 7
			var menu7=new Array()
			
			menu7[0]='<a href="http://www.hkprog.com/downloaddocs/afhusersguide.pdf" class="nav">Form Handling PDF</a><br /><br />'
			menu7[1]='<a href="http://www.hkprog.com/downloaddocs/databasebackup_usersguide.pdf" class="nav">Database Backup (PDF)</a><br /><br />'
			menu7[2]='<a href="http://www.hkprog.com/downloaddocs/shippingcost.pdf" class="nav">VP-ASP Shipping PDF</a><br /><br />'
			menu7[3]='<a href="http://www.hkprog.com/downloaddocs/paywithpointsusersguide.pdf" class="nav">Pay with Points PDF</a><br /><br />'
			menu7[4]='<a href="http://www.hkprog.com/downloaddocs/index.htm" class="nav">Manuals index</a><br /><br />'
			menu7[5]='<a href="http://www.hkprog.com/afh/afhfaq.htm" class="nav">Form Handling FAQ</a><br /><br />'
	
			//Contents for menu 8
			
	
	var menuwidth='165px' //default menu width
	var disappeardelay=250 //menu disappear speed onMouseout (in miliseconds)
	var hidemenu_onclick="yes" //hide menu when user clicks within menu?
	
	/////No further editting needed
	
	var ie4=document.all
	var ns6=document.getElementById&&!document.all
	
	if (ie4||ns6)
	document.write('<div id="dropmenudiv" style="visibility:hidden;" onMouseover="clearhidemenu()" onMouseout="dynamichide(event)" class="Nav_List"></div>')
	
	function getposOffset(what, offsettype){
	var totaloffset=(offsettype=="left")? what.offsetLeft : what.offsetTop;
	var parentEl=what.offsetParent;
	while (parentEl!=null){
	totaloffset=(offsettype=="left")? totaloffset+parentEl.offsetLeft : totaloffset+parentEl.offsetTop;
	parentEl=parentEl.offsetParent;
	}
	return totaloffset;
	}
	
	
	function showhide(obj, e, visible, hidden, menuwidth){
	if (ie4||ns6)
	dropmenuobj.style.left=dropmenuobj.style.top=-500
	if (menuwidth!=""){
	dropmenuobj.widthobj=dropmenuobj.style
	dropmenuobj.widthobj.width=menuwidth
	}
	if (e.type=="click" && obj.visibility==hidden || e.type=="mouseover")
	obj.visibility=visible
	else if (e.type=="click")
	obj.visibility=hidden
	}
	
	function iecompattest(){
	return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
	}
	
	function clearbrowseredge(obj, whichedge){
	var edgeoffset=0
	if (whichedge=="rightedge"){
	var windowedge=ie4 && !window.opera? iecompattest().scrollLeft+iecompattest().clientWidth-15 : window.pageXOffset+window.innerWidth-15
	dropmenuobj.contentmeasure=dropmenuobj.offsetWidth
	if (windowedge-dropmenuobj.x < dropmenuobj.contentmeasure)
	edgeoffset=dropmenuobj.contentmeasure-obj.offsetWidth
	}
	else{
	var topedge=ie4 && !window.opera? iecompattest().scrollTop : window.pageYOffset
	var windowedge=ie4 && !window.opera? iecompattest().scrollTop+iecompattest().clientHeight-15 : window.pageYOffset+window.innerHeight-18
	dropmenuobj.contentmeasure=dropmenuobj.offsetHeight
	if (windowedge-dropmenuobj.y < dropmenuobj.contentmeasure){ //move up?
	edgeoffset=dropmenuobj.contentmeasure+obj.offsetHeight
	if ((dropmenuobj.y-topedge)<dropmenuobj.contentmeasure) //up no good either?
	edgeoffset=dropmenuobj.y+obj.offsetHeight-topedge
	}
	}
	return edgeoffset
	}
	
	function populatemenu(what){
	if (ie4||ns6)
	dropmenuobj.innerHTML="<table width='100%' border='0' cellspacing='0' cellpadding='0'><tr><td width='18'>&nbsp;</td><td width='63'>&#160;</td><td valign='top' align='right' width='86' style='border-top: solid 1px #9999cc'>&nbsp;</td></tr><tr><td>&#160;</td><td colspan='2' nowrap='true' class='nav'>" + what.join("") + "</td></tr></table>"
	}
	
	
	function dropdownmenu(obj, e, menucontents, menuwidth){
	if (window.event) event.cancelBubble=true
	else if (e.stopPropagation) e.stopPropagation()
	clearhidemenu()
	dropmenuobj=document.getElementById? document.getElementById("dropmenudiv") : dropmenudiv
	populatemenu(menucontents)

	if (ie4||ns6){
	showhide(dropmenuobj.style, e, "visible", "hidden", menuwidth)
	dropmenuobj.x=getposOffset(obj, "left") - 7
	dropmenuobj.y=getposOffset(obj, "top") 
	dropmenuobj.style.left=dropmenuobj.x-clearbrowseredge(obj, "rightedge")+"px"
	dropmenuobj.style.top=dropmenuobj.y-clearbrowseredge(obj, "bottomedge")+obj.offsetHeight+"px"
	}
	
	return clickreturnvalue()
	}
	
	function clickreturnvalue(){
	if (ie4||ns6) return false
	else return true
	}
	
	function contains_ns6(a, b) {
	while (b.parentNode)
	if ((b = b.parentNode) == a)
	return true;
	return false;
	}
	
	function dynamichide(e){
	if (ie4&&!dropmenuobj.contains(e.toElement))
	delayhidemenu()
	else if (ns6&&e.currentTarget!= e.relatedTarget&& !contains_ns6(e.currentTarget, e.relatedTarget))
	delayhidemenu()
	}
	
	function hidemenu(e){
	if (typeof dropmenuobj!="undefined"){
	if (ie4||ns6)
	dropmenuobj.style.visibility="hidden"
	}
	}
	
	function delayhidemenu(){
	if (ie4||ns6)
	delayhide=setTimeout("hidemenu()",disappeardelay)
	}
	
	function clearhidemenu(){
	if (typeof delayhide!="undefined")
	clearTimeout(delayhide)
	}
	
	if (hidemenu_onclick=="yes")
	document.onclick=hidemenu
	
