nt "  Sessions=" &amp; cMedia.Sessions
          Debug.Print "  LastTrack=" &amp; cMedia.LastTrack
          Debug.Print "  Start=" &amp; cMedia.StartAddress
          Debug.Print "  Next=" &amp; cMedia.LastWritable
          Debug.Print "  Free=" &amp; cMedia.FreeBlocks
       Else
          Debug.Print "  No Media in drive"
       End If
       .CloseExclusive

</pre><p>
Finally, we can display the recorder properties and supported
burning formats (although it is very unlikely you'll have a recorder that
