IsReady (Propiedad)

           

Descripción

Devuelve True si la unidad especificada está preparada y False si no lo está.

Sintaxis

objeto.IsReady

El objeto es siempre un objeto Drive.

Comentarios

Para unidades de medios separables y unidades de CD-ROM, IsReady devuelve True sólo cuando se insertan los medios apropiados y están preparados para el acceso.

El código siguiente demuestra la utilización de la propiedad IsReady:

Sub ShowDriveInfo(drvpath)
    Dim fs, d, s, t
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set d = fs.GetDrive(drvpath)
    Select Case d.DriveType
        Case 0: t = "Desconocido"
        Case 1: t = "Separable"
        Case 2: t = "Fijo"
        Case 3: t = "Red"
        Case 4: t = "CD-ROM"
        Case 5: t = "Disco RAM "
    End Select
    s = "Unidad " & d.DriveLetter & ": - " & t
    If d.IsReady Then 
        s = s & vbCrLf & "La unidad está preparada."
    Else
        s = s & vbCrLf & "La unidad no está preparada."
    End If
    MsgBox s
End Sub