Sub MenuOnMouseOver(xname)
		document.all(xname).classname = "menubar_button_on"
	End Sub

	Sub MenuOnMouseOut(xname)
		document.all(xname).classname = "menubar_button"
	End Sub