Function flashDetectIE(flashVer)
		on error resume next
		Dim checkForFlash
		checkForFlash = (IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash."&flashVer)))
		flashDetectIE = checkForFlash
	end Function