    <!--
      on error resume next
      found = (NOT (IsNull(CreateObject("ShockwaveFlash.ShockwaveFlash.1"))))
    rem -->