FoxPro/Visual FoxPro - Saber si hay un disco en una unidad

Bajo version 6.

Alguna funcion o api que me permita saber si hay un dico en la unidad? por ejemplo CD...

No diskspace() ya que no reconoce a veces un regrabable en red...

Gracias

* Para saber si una unidad esta disponible
LOCAL loFSO, loDrive
loFSO = createobject('Scripting.FileSystemObject')
loDrive = loFSO.GetDrive("e:")
x = lodrive.driveletter
? x + ': ' + IIF(loDrive.IsReady,'Unidad Disponible', 'Unidad no Disponible')
RETURN

Gracias ya lo pruebo...