If ScriptEngineMajorVersion >= 2 then
on error resume next
flashDetect = IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.5"))
End If