FoxPro/Visual FoxPro - Como Verificar si hay un disquette puesto

Necesito saber como hacer para averiguar si hay un diskette puesto en la disquettera desde FOXPRO 2.6 P/DOS. es para que antes de copiar al diskette, controle que se halla insertado uno.
agradeceria si alguien puede ayudarme.

en la caja de texto buscar de este mismo foro escribe la siguiente palabra DISKSPACE y el sistema te arrojara barias respuesta elige la que mejor te conevenga

Atte
ROD

Podrías usar una rutina de captura de errores, donde intentes leer o escribir un archivo en diskette y capturar el número de error que regrese en caso de no haber disquette. El problema sería que no te quitarías el mensaje de error propio del DOS. Hace años un amigo me paso una rutina en C que revisa si había un disco en la unidad, y no aparecía el mensaje de DOS, pero con el cambio a Win 9x esta rutina se me extravió.

¿Que tal esta rutina?

/*
* ISDRIVE()
*
* Testea la existencia de un drive y/o subdirectorio
*
* SYNTAXIS
* IsDrive( <cDriveDir> ) -> lResult
*
* ARGUMENTOS
* <cDriveDir> es un cadena conteniendo la unidad (con ":")
* o la unidad y path a buscar.
*
* RETORNA
* <lResult> lógico -
* .T. si se encuentra la unidad (o directorio)
* .F. si no se encuentra
*
* EJEMPLOS
* IF IsDrive( "D:" )
* WAIT WINDOW "Escribiendo en Unidad D:" NOWAIT
* ENDIF
* END
*/
FUNCTION IsDrive( cDrvDir )
&& Verifica si se pasa la "\" ; si es necesario la agrega
RETURN FILE(( cDrvDir + IF(RIGHT(cDrvDir, 1) == "\", "", "\" ) + "NUL"))