in access to the media information, you must open the recorder
exclusively; as far as I know this is the only time you should do this
and it is wise to close the recorder again as soon as possible:
</p><pre>
Dim cMedia As cMediaInfo

       .OpenExclusive
       Set cMedia = cRecorder.MediaInfo
       Debug.Print "Media:"
       If cMedia.MediaPresent Then
          Debug.Print "  Media Type=" &amp; cMedia.MediaType
          Debug.Print "  Media Flags=" &amp; cMedia.MediaFlags
         
          Debug.Pri