You can use WSH.

oFSO = CREATEOBJECT("Scripting.FileSystemObject")
oDrv = oFSO.GetDrive("E:")
? oDrv.IsReady

>Let's say that 'e:' is my CD-ROM drive. If there's nothing in there when I execute the following statement:
>
>= ADIR(X, 'E:')
>
>I get an OS error that the CD-ROM drive is not ready. This only happens for Windows XP.
>
>Is there a windows api call I could make to first check to see if the CD-Rom drive is ready? I know that VB has an IsReady() function that handles this, but I can't find anything similar in VFP.
>
>Thanks, Jesse