Determine CD from DVD and/or Burner

[chihuahualand]

While this is probably a VBscript only, has anybody got a solution to
determine what types of optical drives are in a computer?

I haven't been able to identify an optical drive other than as a
"CDROM" (That code is already on this forum).

Which is to say, I really don't care about the media... I'm really more interested in the drives capabilities.

Thanks in advance.