DiscMaster.Recorders

   For iRecorder = 1 To cRecorders.Count
      Set cRecorder = cRecorders(iRecorder)
      With cRecorder
         Debug.Print "PnPID=" &amp; .PnPID
         Debug.Print "VendorID=" &amp; .VendorID
         Debug.Print "ProductID=" &amp; .ProductID
         Debug.Print "RevisionID=" &amp; .RevisionID

         ' ... More to be added here         

      End With
   Next iRecorder
End Sub
</pre><p>
If the recorder has a disc in it, then we can show the media information.  In
order to ga