Lparameters tcDriveName >oFS = CREATEOBJECT('Scripting.FileSystemObject') >For each oDrv in oFS.Drives > If oDrv.DriveLetter = upper(tcDriveName) > Return oDrv.IsReady > Endif >Endfor >Return .F. >