function Image_OnMouseOver(objImg)
dim strSrc
	
	strSrc = objImg.getAttribute("OnMouseOverSrc")
	objImg.src = strSrc
end function

function Image_OnMouseOut(objImg)
dim strSrc
	
	strSrc = objImg.getAttribute("OnMouseOutSrc")
	objImg.src = strSrc
end function