On error resume next isFlash = NOT IsNull(CreateObject("ShockwaveFlash.ShockwaveFlash"))